Hallo zusammen,
was fehlt in folgender Lazarus
unit:
Delphi-Quellcode:
unit Unit2;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, Dialogs;
procedure init;
procedure test;
implementation
procedure test;
begin
showmessage('
Test');
end;
procedure init;
begin
showmessage('
init');
end;
initialization
begin
init;
end;
end.
sobald ich irgendwas im Bereich initialization ausführe schrabbelt's, besser gesagt, es passiert nichts mehr, das Prog startet nicht mehr.
In delphi würde das gehen. Das Problem ist wohl, dass die
unit dialogs zu diesem zeitpunkt
wo init ausgeführt wird noch nicht initialisiert ist. Aber wie kriegt man das hin?