AgeOfWars
asked on
active title bar height URGENT!!!
Hi guys,
How do i get the height of the active title bar of the form?
Please answer as detail as possible :)
Thank you!
How do i get the height of the active title bar of the form?
Please answer as detail as possible :)
Thank you!
Use GetSystemMetrics with parameter SM_CYCAPTION
procedure TForm1.Button1Click(Sender : TObject);
var
caption_height : Integer;
begin
caption_height := GetSystemMetrics(SM_CYCAPT ION);
ShowMessage(IntToStr(capti on_height) );
end;
var
caption_height : Integer;
begin
caption_height := GetSystemMetrics(SM_CYCAPT
ShowMessage(IntToStr(capti
end;
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.