Como quot;Quebrarquot; a linha em um MessageBox?

Delphi

05/11/2004

Olá pessoal, tudo tranquilo? Espero q sim..

Como faço pra ´quebrar´ a linha de um texto exibido em um MessageBox? Se eu botar numa linha só, o texto fica muito grande nas laterais, gostaria de botar uma frase em casa linha.. como isso é possível? Grato pela ajuda..



Allan Elias Ramos :roll:


Aersoftware

Aersoftware

Curtidas 0

Respostas

Gandalf.nho

Gandalf.nho

05/11/2004

Use o velho recurso de concatenar Chr(13) + Chr(10).


GOSTEI 0
E_gama

E_gama

05/11/2004

exemplo:
var strLinha1, strLinha2, strLinha3: string;
begin
  MessageBox(Handle, ´Linha1´#10´Linha2´10´Linha3´, ´titulo´, 0);

  strLinha1 := ´Linha1´;
  strLinha2 := ´Linha2´;
  strLinha3 := ´Linha3´;

  ShowMessage(strLinha1 + 10 + strLinha2 + 10 + strLinha3);
  MessageBox(Handle, PChar(strLinha1 + 10 + strLinha2 + 10 + strLinha3), ´titulo´, MB_ICONINFORMATION);
end;



GOSTEI 0
Dopi

Dopi

05/11/2004

Só pra complementar....

pode usar apenas o #10 que já funciona... Ex:

´Linha 1´ + 10 + ´Linha 2´

Se vc estiver usando a CLX pode usar tags HTML como < br > para quebra de linha... Tb funcionam tags para negrito, Link e outras... é bem interessante... mas só pra aplicações CLX


GOSTEI 0
Aersoftware

Aersoftware

05/11/2004

Valeu pessoal, funcionou certinho com o #10.. abraços...



Allan Elias Ramos :roll:


GOSTEI 0
Gurc

Gurc

05/11/2004

Só para complementar,
É recomendável o uso da constante sLineBreak, nesses casos. No Windows ela retorna #1310 e no linux apenas 10. Talvez fosse melhor usar sempre essa constante para a padronização do código sem deixar qualquer tipo de erro independente de plataforma de compilação.
Até mais,
Gustavo Royer Chaurais


GOSTEI 0
Aersoftware

Aersoftware

05/11/2004

Como assim Gurc? Onde uso isso? No exemplo q botei, funcionou e não deu nenhum erro, mas mesmo assim ele pode aparecer?



Allan Elias Ramos :cry:


GOSTEI 0
POSTAR