Delphi și tlabel

Delphi și TLabel. Deducem sub formă de inscripții pe

Ati cautat pentru Delphi și TLabel. Deduceți inscripțiile pe formular, și mai ales pentru tine, am pregătit această lecție Delphi. Fiecare lecție încercăm să furnizeze codul sursă Delphi, astfel încât la sfârșitul articolului Delphi și TLabel. Deduceți inscripțiile de pe formular, puteți vedea un exemplu de Delphi, și codul Delphi, care va permite Delphi să exploreze și TLabel. Deducem inscripțiile de pe formularul de mai detaliat.
Aflați de programare on-line pe site-ul www.DelphiSchool.3dn.ru și maestru elementele de bază ale programării. Educație Programare DelphiSchool această programare pentru începători și programatori cu experiență.

Delphi TLabel servește la etichete de ieșire. Aceasta este cea mai simplă componentă, folosind pe care le vom aduce la forma noastră de informații. Cel mai adesea, vom folosi proprietatea Caption a acestei componente.
Să creeze un proiect nou și puneți componenta pe formular și TLabel TButton. Acum, să schimbe proprietatea Caption la TLabel componenta „Hello Delphi Label“ (acum am scris acolo Label1), și vom schimba componenta Caption TButton pe „Editare mesaj“.

Figura. componenta TLabel și TButton pe formular

Acum, să creeze o tratare a evenimentului pentru butonul OnClick, și scrie următorul cod:

? 200 '200px': '' + (this.scrollHeight + 5) + 'px'); „> Procedura TForm1.Button1Click (Expeditor: TObject # 41 ;;
începe
Label1.Caption: 'probă cu un TLabel Delphi' =;
se încheie;

După ce vom rula programul nostru, avem o formă apare cu un buton, iar cuvintele „Hello Delphi Label“. Dacă vom apăsa butonul, eticheta se va schimba în „Exemplu de TLabel în Delphi“.

Figura. proprietăți de aplicare Transparent

Pentru a remedia această lecție a modifica ușor exemplu codul de mai sus, care a schimbat înregistrarea noastră (Label1). Dacă facem clic pe butonul, schimbarea de înregistrare Label1, iar al doilea (Label2) nu, asa ca trebuie sa, iar a doua etichetă pentru a face schimbarea:

? 200 '200px': '' + (this.scrollHeight + 5) + 'px'); „> Procedura TForm1.Button1Click (Expeditor: TObject # 41 ;;
începe
Label1.Caption: 'probă cu un TLabel Delphi' =;
Label2.Caption: 'probă cu un TLabel Delphi' =;
se încheie;

Pentru acest cod sursă tutorial este atașat. în cazul în care puteți vedea cum totul a fost făcut și ceea ce am ajuns în cele din urmă. Dar eu recomand cu tărie să faci totul singur. Așa că mai bine și mai repede amânată în memoria materialului acoperit.