Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Catalog · How the catalog works

Random project

panel_info

Make your Delphi & Lazarus application more interactive

View on GitHub

Anyone may press Interesting, signed in or not. It helps others find this project.

Member rating

No ratings yet.

Sign in to rate this project.

README

dfsdf

Source code file "uPanelInfo.pas" ini bisa dimodifikasi secara bebas sesuai dengan keperluan Anda. Jika terjadi sesuatu dengan project Anda setelah menggunakan file "uPanelInfo.pas" bukanlah tanggung jawab Saya, resiko ditanggung sendiri.

cara membuat panel menjadi segitiga dan ujungnya menjadi bundar Saya lupa darimana sumbernya, rasanya dari swissdelphicenter... Terima kasih buat yang membagi koding tersebut.

how to use:

pascal
1. add "uPanelInfo.pas" into your project
pascal
2. create a global variable:
   var
     pInfo: TPanelInfo;
pascal
3. "create object"
   procedure TForm1.FormCreate(Sender: TObject);
   begin
     pInfo := TPanelInfo.Create(Self);
   end;
pascal
4. "show the panel info"
   pInfo.Show(Sender, 'Minimal 3 Karakter', 'BOTTOM', 5)
   or
   pInfo.Show(Edit1, 'The text you want to show', 'TOP', 10)
pascal
5. "hide the panel info"
   pInfo.hide;
pascal
6. "remove object"
   procedure TForm1.FormDestroy(Sender: TObject; var Action: TCloseAction);
   begin
     pInfo.Destroy;
   end;
pascal
video:
  https://www.youtube.com/watch?v=_E-E3rBEetU