Mensagem em tempo de execução...
Como faço para que uma mensagem apareça em meu formulário em tempo de execução?
if MessageDlg(´Exportar dados agora ?´, mtConfirmation, mbOkCancel, 0) = mrCancel then begin
ButExportar.Enabled := True;
ButFechar.Enabled := True;
Exit;
end;
[color=red:9ad3f881f5]LblInforma.Caption := ´Aguarde o fim do processamento...´;[/color:9ad3f881f5]
Screen.Cursor := crHourGlass;
Estou usando um label como acima más, a mensagem simplesmente não aprece no formulário.
Abrigada pela ajuda.
Isadora.
if MessageDlg(´Exportar dados agora ?´, mtConfirmation, mbOkCancel, 0) = mrCancel then begin
ButExportar.Enabled := True;
ButFechar.Enabled := True;
Exit;
end;
[color=red:9ad3f881f5]LblInforma.Caption := ´Aguarde o fim do processamento...´;[/color:9ad3f881f5]
Screen.Cursor := crHourGlass;
Estou usando um label como acima más, a mensagem simplesmente não aprece no formulário.
Abrigada pela ajuda.
Isadora.
Isadora
Curtidas 0
Respostas
Roberto_conetsys
07/07/2003
Ola Isadora
Tente colocar label.refresh apos passar o valor do caption:
label.caption:= ´teste´;
label.refresh;
Tente colocar label.refresh apos passar o valor do caption:
label.caption:= ´teste´;
label.refresh;
GOSTEI 0