Substituir o Tab por Enter no DBMemo

Delphi

16/11/2004

Ola
Sou um novo usuario.

Gostaria de saber o seguinte?

Como posso substituir o Tab por Enter, no DBMemo, na seguinte condição:
Quando der 2 (dois) Enter seguido no DBMemo o Enter vira Tab e apaga 2 (dois) digitos do DBMemo, para não ficar 2 linhas em branco no DBMemo.

Agradeço se alguem puder me ajudar

Atenciosamente
m
b.00000@ig.com.br


M

M

Curtidas 0

Respostas

Jc_analista

Jc_analista

16/11/2004

no evento onkeypress do dbmemo faz o seguinte: 
if key=#13 then
begin
  dbmemo.lines.add(´ ´);
  key:=0;
end;

toda vez q ele apertar o enter vc coloca um espaço em branco. se quiser na que seja na segunda vez vc coloca um contador dentro do if.


GOSTEI 0
POSTAR