Modifizierung um Programm von CD starten zu können

[asdfghjklöä]

Hallo!

Ich habe ein kleines Lernprogramm geschrieben und möchte es jetzt so modifizieren, dass es möglich ist es von einer CD zu starten.
Das Problem ist, dass ich nicht weiß, wie ich die Grafiken(die auf der selben CD wie das Programm gespeichert sind) aufrufen soll, da mir kein allgemein gültiger Pfad bekannt ist.

Vielen Dank im vorraus für die Hilfe!

[Klaus01]

kannst Du denn nicht den Pfad relativ zu Deinem Programmverzeichnis angeben,
oder ist das von CD zu CD verschieden.

Oder Du holst Dir damit den Laufwerksbuchstaben

function ExtractFileDrive(const FileName: string): string;

Grüße
Klaus

[gsh]

du kannst dir ja im Programm den relativen Pfad merken und mit ExtractFilePath(ParamStr(0)); den Pfad zu deiner Exe herausfinden.

BSP:

Relativer Pfad: 'images/bild1.bmp'

ExtractFilePath(ParamStr(0)) = 'F:/'

ExtractFilePath(ParamStr(0))+Relativer Pfad = 'F:/images/bild1.bmp'

[Andreas L.]

Delphi-Quellcode:

imgpath:=extractfilepath(application.exename)+'images\';


image1.picture.loadfromfile(imgpath+'bild.png');

extractfilepath extrahiert die Ordnerstruktur aus den übergebenen String. In diesem Fall der Pfad wo die exe-Datei deiner Anwendung liegt.

[asdfghjklöä]

danke!!!
werd es gleich mal ausprobieren!