Comenzi delphi

[c0smyn]

Inchidere aplicatie

application.mainform.close; 
sau
application.terminate;

Minimize/Maximize/Restore

application.minimize; [color=green]//minimize[/color]
ShowWindow(application.MainForm.Handle, SW_MAXIMIZE) ; [color=green]//maximize[/color]
ShowWindow(application.MainForm.Handle, SW_RESTORE); [color=green]//restore[/color]

Mesaje

ShowMessage('Test' ); [color=green]//mesaj normal[/color]
raise exception.create('Test' ); [color=green]//mesaj eroare[/color]
MessageDlg('Test', mtinformation, [mbOk], 0); [color=green]//mesaj informatie[/color]
[color=green][u]//mai sunt si altele dar acestea sunt cele mai folositoare[/color][/u]

Cum incarcam/salvam un text intr-un memo

memo1.lines.loadfromfile('C:\windows\test.txt' ); [color=green]//pt a incarca[/color]
memo1.lines.savetofile('C:\windows\test.txt' ); [color=green]//pt a salva[/color]

Cum incarcam/salvam o imagine intr-un TImage

image1.picture.loadfromfile('C:\windows\test.bmp' ); [color=green]//pt a incarca[/color]
image1.picture.savetofile('C:\windows\test.bmp' ); [color=green]//pt a salva[/color]

Cum ne conectam cu un tcpclient pe un tcpserver

tcpclient1.remotehost := 'Adresa IP';
tcpclient1.remoteport := 'Port';
tcpclient1.connect; [color=green]//Conectare ...[/color]

Cum declaram o variabila

var NUME_VARIABILA: tip(string , integer , boolean , single , double etc..);
[b]EXEMPLU[/b]
var a: boolean;
begin
a := false;
if a = true then 
showmessage('True')
else
showmessage('False');
end;

[MaX19]

ms :**: