Re: [delphi-br] Uma ajuda para transferir p/ um edit

Tente assim: begin Texto := 'dezexe c:\Cursos\WinXp.zip winxp01.exe'; Edit1.Text := Copy(Texto,1, Pos(' ', Texto)-1); Texto := Copy(Texto, Pos(' ', Texto)+1,Lenght(Texto)); // edit2 if Length(Texto) > 0 then begin Edit2.Text := Copy(Texto,1, Pos(' ', Texto)-1); Texto := Copy

[delphi-br] Uma ajuda para transferir p/ um edit

Gente uma ajuda por favor Com um clique num botao eu quero extrair do texto 'dezexe c:\Cursos\WinXp.zip winxp01.exe' e passar para edit assim. edit1 ==> dezexe edit2 ==> c:\cursos\winxp.zip edit3 ==> winxp.exe Mas tá ficando assim ó: O edit1 tá legal 'dezexe' O edit2 tá assim 'dezexe' o edit