Download FreePascal 2.4.2 compilatore per creare programmi in Pascal
Software->Software per programmare
Free Pascal è il compilatore con il quale possiamo creare programmi da eseguire su qualunque piattaforme.
A questo indirizzo è disponibile la versione per Windows compreso Vista, per processori a 32 bit.
La guida in Pdf di Free Pascal .
Il range supportato è davvero totale.
Nel sito troviamo i binari anche per Game Boy Advance .
Il programma supporta Pascal e Object Pascal.
Esiste anche un Wiki ma non in italiano.
Una volta installato andiamo nella consolle di Windows ed incolliamo il seguente comando:
cd C:\FPC\2.4.2\bin\i386-win32
fpc C:\FPC\2.4.2\demo\win32\winhello.pp
Verrà creato un eseguibile winhello.exe, la cosa molto interessante che il programma generato è 32 KB e usa le api di WIndows native quindi, ovunque lo andrete ad eseguire girerà senza problemi.
Ecco uno stralcio del codice sorgente:
function WindowProc(Window: HWnd; AMessage: UINT; WParam : WPARAM;
LParam: LPARAM): LRESULT; stdcall; export;
var
dc : hdc;
ps : paintstruct;
r : rect;
begin
WindowProc := 0;
case AMessage of
wm_paint:
begin
dc:=BeginPaint(Window,@ps);
GetClientRect(Window,@r);
DrawText(dc,'Hello world by Free Pascal',-1,@r,
DT_SINGLELINE or DT_CENTER or DT_VCENTER);
EndPaint(Window,ps);
Exit;
end;
wm_Destroy:
begin
PostQuitMessage(0);
Exit;
end;
end;
Come potete vedere vengono usate le api native del sistema Windows.
Free Pascal è molto utile per creare programmi potentissimi senza portarsi dietro mille librerie.
