Solved

Form borders disappear

Posted on 2006-07-08
3
235 Views
Last Modified: 2010-04-05
HI,

When I resize my form you see the left en right border, but when I maximize the form
the left and right border dissappear.

I have tried to set de borderwidth of the form to 1, but even with borderwidth = 1
the borders disappear when the form is maximized.

Does anyone know a solution?

Peter
0
Comment
Question by:peterkiers
  • 2
3 Comments
 
LVL 28

Accepted Solution

by:
2266180 earned 250 total points
ID: 17064314
all borders "dissapear" when maximizing. they actually have negative coordonates.
if you want to also see the borders, you need to simulate the maximize or intercept it and modify the sizes.

here is an example for intercepting:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
    procedure FormResize(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
    resizing:boolean;
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormResize(Sender: TObject);
begin
  if (not resizing) and (left<0) then
  begin
    resizing:=true;
    width:=width-9;
    left:=0;
    height:=height-9;
    top:=0;
//    width:=width+1;
    resizing:=false;
  end;{}
end;

end.
0
 
LVL 28

Expert Comment

by:2266180
ID: 17064319
ups. uncomment the
//    width:=width+1;
0
 
LVL 1

Author Comment

by:peterkiers
ID: 17064580
Thank you it works.

P.
0

Featured Post

Does Powershell have you tied up in knots?

Managing Active Directory does not always have to be complicated.  If you are spending more time trying instead of doing, then it's time to look at something else. For nearly 20 years, AD admins around the world have used one tool for day-to-day AD management: Hyena. Discover why

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Objective: - This article will help user in how to convert their numeric value become words. How to use 1. You can copy this code in your Unit as function 2. than you can perform your function by type this code The Code   (CODE) The Im…
Hello everybody This Article will show you how to validate number with TEdit control, What's the TEdit control? TEdit is a standard Windows edit control on a form, it allows to user to write, read and copy/paste single line of text. Usua…
This tutorial gives a high-level tour of the interface of Marketo (a marketing automation tool to help businesses track and engage prospective customers and drive them to purchase). You will see the main areas including Marketing Activities, Design …
Along with being a a promotional video for my three-day Annielytics Dashboard Seminor, this Micro Tutorial is an intro to Google Analytics API data.

773 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question