[delpi] idftp wysyłanie do katalogu

czesc
korzystam ze sposobu wysyłania pliku na serwer:

idftp1.Password:='Hasło';
idftp1.Username:='Nazwa_użytkownika';
idftp1.Host:='ftp://adres_ftp';
idftp1.Connect(true,-1);
idftp1.Put('C:\plik.ini','plik.ini',true);
idftp1.Disconnect;

ale za każdym razem muszę ten plik.ini kopiować na dysk c. A ten plik mam zapisany w folderze z programem. Czy mógłby mi ktoś pomóc wykonać aby plik.ini z foldera został wysłany na ftp i zapisany w katalogu plikidysk ( który znajduje sie na serwerze)

z góry dziękuje

Heh... Musisz podać ścieżkę do folderu z aplikacją. Tj :

ExtractFilePath(Application.ExeName)+'plik.ini';

Funkcja ExtractFilePath wskazuje ścieżkę do folderu. Jeśli to nie będzie działać, będziesz musiał konwertować dane na typ char (funkcja Pchar) :

Pchar(ExtractFilePath(Application.ExeName)+'plik.ini');

uzywalem tego
ExtractFilePath(Application.ExeName)+'plik.ini';

teoretycznie dziala wysyla plik na serwer ale nie pod nazwa plik.ini tylko ftpjwmw pod takim roznymi nazwami wysyla

juz mam zeby zapisywało mi w katalogu, ktorym chce

try
idftp1.Username := '';
idftp1.Password := '';
idftp1.Host     := '';
idftp1.port :=21;
idftp1.Passive := false;

idftp1.Connect(true,-1);
idftp1.ChangeDir('images');
 idftp1.Put(Pchar(ExtractFilePath(Application.ExeName)+'plik.ini'));
 except
idftp1.Disconnect;

tylko w dalszym ciągu zapisuję mi sie ten plik np pod nazwą ftpqmw18B</quote>

Teraz będzie działać:

IdFTP1.Put('nazwa pliku na dysku','nazwa pliku na serwerze',False)

tak robilem i wtedy trzeba podac pelna sciezke do pliku

idftp1.Put('C:\plik.ini','plik.ini',true);

moj blad... dawalem true a jak jest false to dziala

dziekuje bardzo Autre