Delphi 7 - smycka – Delphi – Fórum – Programujte.com

Dobry den, chtel bych vas poprosit o radu.

Mam promenou string a potreboval bych text z te promene rozlozit na jednotlive znaky do jine array promene.
Vim ze tam bude smycka a brat ty pismenka postupne jen nevim jake prikazy pouzit...

diky..

tak zaprve pokud chces pristupovat k jednotlivym pismenu tak se to dela takhle

edit1.text := mujretezec[3]; //do editu bude vypsan 4. znak

procedure TForm1.Button1Click(Sender: TObject);

var s: string;

    i: integer;

    a: array of char;

begin

s:='text';

SetLength(a,Length(s)-1);



for i:=0 to Length(s)-1 do begin

  a[i]:=s[i];

end;



end;