View Single Post
  #49  
Old 05-02-2022, 11:30
hitman797's Avatar
hitman797 hitman797 is offline
Registered User
 
Join Date: Feb 2013
Location: Algeria
Posts: 168
Thanks: 486
Thanked 202 Times in 122 Posts
hitman797 is on a distinguished road
Thumbs up

Quote:
Originally Posted by fabrieunko View Post


Hi,
how did you put the icons on the left?
You can add these icons using this font.
nameIcon:=TLabel.Create(nameForm);
with nameIcon do
begin
Parent:=AutorunForm;
SetBounds(0,0,0.0,0);
with Font do
begin
Name:='Symbol Font';
Size:=0;
Color:=$FFFFFF;
Caption:=#$E13D;
OnClick:=@nameiconOnClick;
OnMouseEnter:=@nameIconEnter;
OnMouseLeave:=@nameIconLeave;
BringToFront;
end;
Attached Files
File Type: zip Symbol Font.zip (98.0 KB, 26 views)

Last edited by hitman797; 25-06-2022 at 01:26.
Reply With Quote