Zdravím,
mám následující vzorový kód:
Kód:
program ex1;
{$mode objfpc}
uses
glib,gtk;
procedure destroy(widget : pGtkWidget ; data: pgpointer ); cdecl;
begin
gtk_main_quit();
end;
var
window : pGtkWidget;
begin
gtk_init (@argc, @argv);
window := gtk_window_new (GTK_WINDOW_TOPLEVEL);
gtk_signal_connect (pGTKOBJECT (window), 'destroy',
GTK_SIGNAL_FUNC (@destroy), NULL);
gtk_widget_show (window);
gtk_main ();
end.
a snažím se ho zkompilovat. Jenže nevím jak na to. Neustále mi to hází, že fpc nemůže najít glib atd.
Používám UBUNTU 10.4.
fpc-unit-gtk i fpc-unit-gtk2 jsem nainstaloval pomocí synapticu a když se podívám kde je to nainstalované tak vidím cestu /usr/lib/fpc/2.4.0/units/x86_64-linux/gtk/ a tam jsou všechny podle mě potřebné věci. (podle mě. jako glib.ppu a gtk.ppu )
Pascalovský soubor se jmenuje gtk_1.pas a snažím se to zkompilovat příkazem:
fpc gtk_1.pas -F1/usr/lib/fpc/2.4.0/units/x86_64-linux/gtk/
Neporadil by mi někdo co dělám špatně? Taky nevím jestli mám používat unit gtk nebo gtk2?