Application.messagebox

[Guest Eduardo Moura Schaukoski]

olá

if application.MessageBox('Deseja Gravar Relação?', 'Confirma', + mb_yesno+mb_iconquestion+mb_defbutton2)=idyes then

como adicionar um valor de variavel em deseja gravar relacao? tipo

'deseja gravar relacao entre ' + nome ' e ' + otronome, ?

nome e otronome são variaveis string que contem os nomes

ou ate mesmo

'deseja gravar relacao entre ' + formaterior.edit1.text ' e ' + otroform.edit2.text, ?

[Progr'amador]

Olá,

Faz assim:

var nome, otronome : string;
begin
  nome := 'João';
  otronome := 'Maria';
  if application.MessageBox(pChar('Deseja gravar relacao entre '+nome+' e '+otronome+' ?'), 'Confirma', + mb_yesno+mb_iconquestion+mb_defbutton2)=idyes then

Abs. Progr'amador.

B)

[Guest Eduardo Moura Schaukoski]

Valeu!!!

Obrigado, ajudou bastante =)