Ĺadny brzuch
hej
chciałem sie zapytać jak zrobic kopiowanie np: osmiu plików
na necie jest wsedzie po jednym pliku
i nie nie wiem jak zrobic zeby sie dało wiecej plików skopiowac
potrzebne mi to jest do instalatatora mojego programu
prosze o pomoc
var R : TSHFileOpStruct; FSize : Integer; Src, Dst : file; TotalSize : Integer; begin with R do begin Wnd:=Handle; // oznaczenie uchwytu lpszProgressTitle := 'Skopiuj plik....';// tutuł okienka wFunc:=FO_COPY;// opcja pFrom:='nowe.exe'; // z pliku pFrom:='nowe1.exe'; // pTo:='C:\\Program Files\\kt1\\nowe.exe';// do pliku pTo:='C:\\Program Files\\kt1\\nowe1.exe';// do pliku Progressbar1.Position := TotalSize; SpeedButton2.Visible:=true; fFlags:=FOF_NOCONFIRMMKDIR; end; SHFileOperation®; end;
o to kod
Użytkownik ArteK edytował ten post 31 sierpień 2005, 08:43
to żart? Robisz instalator i nie wiesz jak kopiować plik? Po pierwsze, można łatwiej: CopyFile z SysUtils, po drugie po to Bozia wymyslila petle zeby ludzie jej uzywali...
Po trzecie mam nadzieje ze EOT bo lame, latwo dostepne no i myslec trzeba a jak ktos z forumowiczow stwierdzil (nie pamietam kto ;) ) wiekszosc problemow mozna rozwiazac samemu jak sie nie ma neta. Programowanie zacznij od odlaczenia sie od neta na pol roku tak jak st3tc mowil.
//
1. uzywaj [ codebox ]
2. na wszystko bedziesz szukal gotowca? :>
Użytkownik migajek edytował ten post 31 sierpień 2005, 08:39
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
chciałem sie zapytać jak zrobic kopiowanie np: osmiu plików
na necie jest wsedzie po jednym pliku
i nie nie wiem jak zrobic zeby sie dało wiecej plików skopiowac
potrzebne mi to jest do instalatatora mojego programu
prosze o pomoc
var R : TSHFileOpStruct; FSize : Integer; Src, Dst : file; TotalSize : Integer; begin with R do begin Wnd:=Handle; // oznaczenie uchwytu lpszProgressTitle := 'Skopiuj plik....';// tutuł okienka wFunc:=FO_COPY;// opcja pFrom:='nowe.exe'; // z pliku pFrom:='nowe1.exe'; // pTo:='C:\\Program Files\\kt1\\nowe.exe';// do pliku pTo:='C:\\Program Files\\kt1\\nowe1.exe';// do pliku Progressbar1.Position := TotalSize; SpeedButton2.Visible:=true; fFlags:=FOF_NOCONFIRMMKDIR; end; SHFileOperation®; end;
o to kod
Użytkownik ArteK edytował ten post 31 sierpień 2005, 08:43
to żart? Robisz instalator i nie wiesz jak kopiować plik? Po pierwsze, można łatwiej: CopyFile z SysUtils, po drugie po to Bozia wymyslila petle zeby ludzie jej uzywali...
Po trzecie mam nadzieje ze EOT bo lame, latwo dostepne no i myslec trzeba a jak ktos z forumowiczow stwierdzil (nie pamietam kto ;) ) wiekszosc problemow mozna rozwiazac samemu jak sie nie ma neta. Programowanie zacznij od odlaczenia sie od neta na pol roku tak jak st3tc mowil.
//
1. uzywaj [ codebox ]
2. na wszystko bedziesz szukal gotowca? :>
Użytkownik migajek edytował ten post 31 sierpień 2005, 08:39