Ĺadny brzuch
Chcę zrobić aplikację, która zapisze tzw. konfigurację, a konkretnie zapisze pliki z "edit" do pliku "ini".
Zapis miałby polegać na tym, iż pliki zapisywałby się w losowej nazwie składającej się np. z 6 liczb.
Sam zapis wygląda tak:
var PlikConf: TextFile; begin AssignFile(PlikConf, 'c:\config_field.ini'); Rewrite(PlikConf); WriteLn(PlikConf, Edit1.Text); WriteLn(PlikConf, Edit2.Text); CloseFile(PlikConf); end; end.
Potrzebuję kodu, który spowoduje, że zapisze mi plik pod losową nazwą, a następną rzeczą, która jest mi potrzebna to wysyłanie losowego pliku na server ftp. za pomocą komponentu w INDY, czyli komenda mniej więcej taka: ftp.Put('C:\config_field.ini');
No to w skrócie: włączę program, zapisze mi konfigurację w folderze np. c:\folder\tutaj, a następnie jak wcisnę button to losowy plik z tego folderu zostanie wysłany na server ftp (albo wszystkie pliki z folderu, będzie łatwiej).
Proszę o pomoc.
Srednio rozumiem co chcesz osiagnac. Jednak z tego co wyczytalem wszystko czego potrzebujesz to radomize, random, findfirst, findnext.
// Edit: No i oczywiscie pliki ini - TIniFile
Użytkownik Ali240 edytował ten post 04 wrzesień 2006, 13:07
Zapis:
Losujesz liczbę z przedziału <1, 1000000) i zapisujesz.
Wcztywnie:
Wyszukujesz wszystkie pliki z folderu i ścieżki wczytujesz do tablicy lub na przykład TStringList. Losujesz index tablicy/TStringList i wysyłasz plik o tym indexie na serwer.
Ok, teraz inne pytanie, dam wam najłatwiejszy przykład:
na formę wstawiam:
Edit1
Edit2
Edit3
Button1
W edit1 wpisuję imię np. "Leon", w edit2 np. nick np.: "lolek394", w edit3 ścieżkę np. "C:\xxx.ini".
Teraz tak - uzupełniam pola edit1 i edit2, wciskam button1 i chcę by w polu edit3 za miejsce xxx pojawiły się nazwy, które wpisałem w edit1 i edit2, czyli np. X to będzie Edit1, Y to Edit2. No to X + Y = Leonlolek394 (czyli suma edit1 + edit2).
Nie wiem czy mnie rozumiecie.
Użytkownik buster edytował ten post 04 wrzesień 2006, 14:58
ok, powiedzmy, ze już zapisało mi ten plik w losowej nazwie, to co zrobić by ten ostatni utworzony plik wysłało na ftp.
Albo tak - jak przerobić ftp.Put('C;\plik.txt'); tak by wysłał calutki folder na ftp ze wszystkimi plikami, albo o jednym rozszerzeniu?
Wyszukujesz pliki (findfirst+findnext), i wysylasz po kolei kazdy...
Ok, teraz inne pytanie, dam wam najłatwiejszy przykład:
na formę wstawiam:
Edit1
Edit2
Edit3
Button1
W edit1 wpisuję imię np. "Leon", w edit2 np. nick np.: "lolek394", w edit3 ścieżkę np. "C:\xxx.ini".
Teraz tak - uzupełniam pola edit1 i edit2, wciskam button1 i chcę by w polu edit3 za miejsce xxx pojawiły się nazwy, które wpisałem w edit1 i edit2, czyli np. X to będzie Edit1, Y to Edit2. No to X + Y = Leonlolek394 (czyli suma edit1 + edit2).
Nie wiem czy mnie rozumiecie.
Edit3.Text:='"C:\'+Edit1.Text+Edit2.text+'.ini"';
Jesteś kompletnie zielony. Poczytaj sobie o łańcuchach
Nie kasuj poprzedniej tresci posta! Jak cos chcesz dodac, to doklej do posta z prefixem "//EDIT:" a nie piszesz 3 posty po kolei w jednym...
Nie kasuj poprzedniej tresci posta! Jak cos chcesz dodac, to doklej do posta z prefixem "//EDIT:" a nie piszesz 3 posty po kolei w jednym...
nie chciałem spamować.
PS. Jestem zielony... :( ale z waszą pomocą z czasem zrozumiem delphi, tak myślę
Zapomniałem --> dziękuję wam za pomoc, bardzo, ale to bardzo mi pomogliście, kocham was :)
Użytkownik buster edytował ten post 04 wrzesień 2006, 15:40
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Zapis miałby polegać na tym, iż pliki zapisywałby się w losowej nazwie składającej się np. z 6 liczb.
Sam zapis wygląda tak:
var PlikConf: TextFile; begin AssignFile(PlikConf, 'c:\config_field.ini'); Rewrite(PlikConf); WriteLn(PlikConf, Edit1.Text); WriteLn(PlikConf, Edit2.Text); CloseFile(PlikConf); end; end.
Potrzebuję kodu, który spowoduje, że zapisze mi plik pod losową nazwą, a następną rzeczą, która jest mi potrzebna to wysyłanie losowego pliku na server ftp. za pomocą komponentu w INDY, czyli komenda mniej więcej taka: ftp.Put('C:\config_field.ini');
No to w skrócie: włączę program, zapisze mi konfigurację w folderze np. c:\folder\tutaj, a następnie jak wcisnę button to losowy plik z tego folderu zostanie wysłany na server ftp (albo wszystkie pliki z folderu, będzie łatwiej).
Proszę o pomoc.
Srednio rozumiem co chcesz osiagnac. Jednak z tego co wyczytalem wszystko czego potrzebujesz to radomize, random, findfirst, findnext.
// Edit: No i oczywiscie pliki ini - TIniFile
Użytkownik Ali240 edytował ten post 04 wrzesień 2006, 13:07
Zapis:
Losujesz liczbę z przedziału <1, 1000000) i zapisujesz.
Wcztywnie:
Wyszukujesz wszystkie pliki z folderu i ścieżki wczytujesz do tablicy lub na przykład TStringList. Losujesz index tablicy/TStringList i wysyłasz plik o tym indexie na serwer.
Ok, teraz inne pytanie, dam wam najłatwiejszy przykład:
na formę wstawiam:
Edit1
Edit2
Edit3
Button1
W edit1 wpisuję imię np. "Leon", w edit2 np. nick np.: "lolek394", w edit3 ścieżkę np. "C:\xxx.ini".
Teraz tak - uzupełniam pola edit1 i edit2, wciskam button1 i chcę by w polu edit3 za miejsce xxx pojawiły się nazwy, które wpisałem w edit1 i edit2, czyli np. X to będzie Edit1, Y to Edit2. No to X + Y = Leonlolek394 (czyli suma edit1 + edit2).
Nie wiem czy mnie rozumiecie.
Użytkownik buster edytował ten post 04 wrzesień 2006, 14:58
ok, powiedzmy, ze już zapisało mi ten plik w losowej nazwie, to co zrobić by ten ostatni utworzony plik wysłało na ftp.
Albo tak - jak przerobić ftp.Put('C;\plik.txt'); tak by wysłał calutki folder na ftp ze wszystkimi plikami, albo o jednym rozszerzeniu?
Wyszukujesz pliki (findfirst+findnext), i wysylasz po kolei kazdy...
Ok, teraz inne pytanie, dam wam najłatwiejszy przykład:
na formę wstawiam:
Edit1
Edit2
Edit3
Button1
W edit1 wpisuję imię np. "Leon", w edit2 np. nick np.: "lolek394", w edit3 ścieżkę np. "C:\xxx.ini".
Teraz tak - uzupełniam pola edit1 i edit2, wciskam button1 i chcę by w polu edit3 za miejsce xxx pojawiły się nazwy, które wpisałem w edit1 i edit2, czyli np. X to będzie Edit1, Y to Edit2. No to X + Y = Leonlolek394 (czyli suma edit1 + edit2).
Nie wiem czy mnie rozumiecie.
Edit3.Text:='"C:\'+Edit1.Text+Edit2.text+'.ini"';
Jesteś kompletnie zielony. Poczytaj sobie o łańcuchach
Nie kasuj poprzedniej tresci posta! Jak cos chcesz dodac, to doklej do posta z prefixem "//EDIT:" a nie piszesz 3 posty po kolei w jednym...
Nie kasuj poprzedniej tresci posta! Jak cos chcesz dodac, to doklej do posta z prefixem "//EDIT:" a nie piszesz 3 posty po kolei w jednym...
nie chciałem spamować.
PS. Jestem zielony... :( ale z waszą pomocą z czasem zrozumiem delphi, tak myślę
Zapomniałem --> dziękuję wam za pomoc, bardzo, ale to bardzo mi pomogliście, kocham was :)
Użytkownik buster edytował ten post 04 wrzesień 2006, 15:40