Jak zrobić takie cuś:
[code]
var
Sciezka : array[0..MAX_PATH] of char;
X : string;
begin
try
GetCurrentDirectory(sizeof(Sciezka),Sciezka);
X := (Sciezka+''+application.ExeName);
[/code]
i pisze tam w X := (Sciezka+''+application.ExeName);
że Imkontatibile types....
Daj zmienną Sciezka jako string, i tak możesz potem traktowac ją jako tablicę charów.
Nie można w wyrażeniu użyć operatora + jeśli jeden z operandów jest łańcuchem (string), a drugi PChar-em.
A dlaczego akurat GetCurrentDirectory?
Ja bym to zrobił tak:
X := GetCurrentDir + '' + Application.ExeName;
chociaż coś mi się zdaje, że chodziłi Ci o:
X := GetCurrentDir + '' + ExtractFileName(Application.ExeName);
Ja bym to zrobił tak:
X := GetCurrentDir + '' + Application.ExeName;
To byś źle zrobił, bo Application.exename zwraca też ścieżkę do pliku.
A mi się wydaje, że chcesz pobrać pełną ścieżkę do swojej aplikacji i kombinujesz niepotrzebnie, bo ta ścieżka wraz z nazwą pliku to właśnie Application.ExeName. A jeśli chcesz wyciągnąć sam folder - ExtractFileDir, samą nazwę pliku - ExtractFileName itd..