var
komputer : string;
dysk : string;
plik : string;
sciezka : string;
begin
komputer := 'HAL'; //nazwa komputera
dysk := 'C'; //nazwa dysku (tak jak jest udostepniona)
plik := 'kupa.bmp'; //plik ze sciezki (oczywiscie moze byc takze w innym folderze)
sciezka := '\'+komputer+''+dysk+''+plik;
copyfile(PChar(sciezka), 'C:\kupa.bmp', true);
end;
Teraz działa
No a ja mam 14 :D
Poducz się trochę i wtedy pogadamy :P
Ps.:
Popraw błędy :D
Czyli ma być tak ???????
var
komputer : string;
dysk : string;
plik : string;
sciezka : string;
begin
komputer := 'HAL' ;//nazwa komputera
dysk := 'C';//nazwa dysku (tak jak jest udostepniona)
plik := 'kupa.txt';//plik ze sciezki (oczywiscie moze byc takze w innym folderze)
sciezka :=
+komputer++dysk+ ''+ plik;copyfile(PChar(sciezka),'C:\kupa.txt', true);
end;
Proponawał bym napisać to jeszcze raz bo teraz nie wiem czy to działa czy nie
czy ma bys Char czy String :D
Nie dziala, bo jest tak:
A powinno byc:
Nie dziala....
Ja tez
Ech... wiecie co... mam 11 lat :D
Maleńka nieścisłość:
PChar to nie to samo co Char.
Typ Char jest typem prostym - znakowym.
Reprezentuje jednobajtowe znaki ANSI, obecnie w Delphi jest równoważny z typem AnsiChar.
Natomiast typ PChar jest wskaźnikiem do ciągu znaków typu Char, zakończonego bajtem zerowym (null-terminated string).
"Polecenie" PChar(plik) to rzutowanie zmiennej (właściwie to jej wartości) plik (typu String - po modyfikacji oczywiście) na typ PChar.
Średniki to bardzo ważna rzecz ;)
I znaki dodawania też...
zamień na
Bardzo polecam lekturę pomocy do Delphi - naprawdę warto...
Pozdrofka :)
oki, a jak znalezc jakis komputer w sieci? albo jak zrobic liste dostepnych komputerow w sieci Microsoft network?
zamien : copyfile(plik, 'C:\kupa.bmp', true);
na : copyfile(PChar(sciezka), 'C:\kupa.bmp', true);
Oraz wszystkie zmienne daj do jednej linijki podostawiaj ';' i zmien typy z PAnsiiChar na stringi
Jak już wspomniałem w innym miejscu, potrafisz zabłysnąć :-)
Nie zapominaj tylko o średnikach, a wszystko będzie ok.
U mnie Delphi się trochę pluje o typ PAnsiiChar. Zamiast tego możesz użyć typu String i koniecznie w funkcji copyfile(...) zmienną plik rzutować na na typ Char poprzez polecenie PChar(plik).
Powodzenia