Ist dir eigentlich klar, dass du den genaue pfad zu deinen bildern angeben musst? Es reicht nicht, wie z.B. bei
HTML relative angaben zu machen.
Pack den ordner mit deinen bilden in das selbe verzeichnis wie deine .exe und mach dann wenn du ein bild öffnest folgendes:
Delphi-Quellcode:
{ am beispiel vom button1 }
procedure TForm1.Button1Click(Sender: TObject);
begin
if (aktuellerRaum.Norden <> nil) then
begin
aktuellerRaum:= aktuellerRaum.Norden;
Image1.Picture.LoadFromFile(ExtractFilePath(ParamStr(0))+aktuellerRaum.Bild);
Memo1.Lines.Add(aktuellerRaum.Beschreibung);
end;
end;
Das ExtractFilePath(ParamStr(0)) gibt den pfad, in dem sich die exe befindet als string zurück. Du kannst es jetzt entweder so machen, wie ich es hier geschrieben habe oder du packst das mit dem ExtractFilePath gleich in das erzeugen der räume mit rein.