Im Abschnitt initialization sollte man ganz vorsichtig sein.
Der Code wird so früh im Programm aufgerufen, dass viele Dinge noch nicht möglich sind.
ShowMessage() könnte durchaus dazu gehören.
Folgender Code müsste eigentlich laufen:
Delphi-Quellcode:
implementation
var
start_message : string;
procedure test;
begin
showmessage('Test -' + start_message);
end;
procedure init;
begin
start_message := 'init ist erfolgt!'
end;
initialization
begin
init;
end;
end.