Como faço esse recurso ?

Delphi

16/12/2004

Queria que quando o usuario teclasse TAB num Memo, o foco desse um espaço igual ao word. se algum dá uma dica desde já agradeço.


Jefmene

Jefmene

Curtidas 0

Respostas

Ipc$

Ipc$

16/12/2004

Olá !
Declare na classe do formulário:
procedure WndProc(var msg:TMessage); override;


Depois:
procedure TForm1.WndProc(var msg:TMessage);
begin
  if not Assigned(Memo1) or
     not Memo1.Focused or
     (msg.Msg <> CM_DIALOGKEY) then
    inherited;
end;



GOSTEI 0
Tinorj

Tinorj

16/12/2004

Coloque a propriedade do TMemo.WantTabs para True. Pelo menos no Delphi 6 têm.


GOSTEI 0
Ipc$

Ipc$

16/12/2004

Coloque a propriedade do TMemo.WantTabs para True.


É mesmo; bem mais simples :(


GOSTEI 0
POSTAR