Ajudem-me com o Memo.

19/05/2003

1

Pessoal preciso fazer isso. Tenho um memo(memo1), nesse memo tenho itens:
@00Nome&
@22Nome2 &

preciso separar em duas variáveis os números e as letras tipo:

if memo1.text[x] = ‘@’ then
begin
numero:= pega os numeros ( os dois numeros, no primeiro caso seria 00)
end;

depois preciso pegar as letras tipo assim:

if memo1.text[x+1 <> ‘&’ then
begin
nome:= pega as letras ( pega todas as letras até o caracter ‘&’. Nesse caso seria a palavra Nome)

Valeu pessoal, espero que vocês me ajudem.
By OverFlow.

“ Nunca tome atalhos que prometam coisas rápidas e fáceis. As coisas bem feitas levam tempo e sabedoria.” Por mim mesmo.


Responder

Posts

20/05/2003

Crash

Kra eu criei uma função que retira Variaveis de um memo. Se você quiser eu te passo ela. É só me mandar um e-mail!!!


flws
t+


Responder