[delphi] - kopiowanie tablicy char do string

Jak przekopiwać coś takiego:
acFileName:array[0..cnMaxFileNameLen]of char;

do String i AnsiString?

Znalazłem funkcję function StringOfChar(Ch: Char; Count: Integer): string;
ale nie chcę teog robić w pętli tylko chcę żeby funkcja miała parametr z adresem bufora i sama to w pętli kopiowała.

---

string:=strpas(array of char); lub string:=array of char; lub setlength(string,length(array of char)); StrCopy(pchar(string),array of char); lub setlength(s,length(b)); CopyMemory(pchar(s),@b,length(b));


string:=strpas(array of char); lub string:=array of char; lub setlength(string,length(array of char)); StrCopy(pchar(string),array of char); lub setlength(s,length(b)); CopyMemory(pchar(s),@b,length(b));

procedure TForm1.Button1Click(Sender: TObject); var a, b, s:string; i:integer; begin b:='abcxyz211def'; a:='xyz211'; i:=pos(a,b); if i>0 then begin s:=b; delete(s,i,length(a)); end; end;
Użytkownik Cyrkiel edytował ten post 29 styczeń 2006, 20:25

zanotowane.pl

doc.pisz.pl

pdf.pisz.pl

zsf.htw.pl