Código Delphi [-] var Forma: TPasswordDlg; begin Forma := TPasswordDlg.Create(Forma); Forma.Caption := 'Validar Contrasenas'; Forma.FormStyle:=fsMDIForm; Forma.ShowModal; Regresaconecion:=Forma.TerminalLocal.Text; end;
var Forma: TPasswordDlg; begin Forma := TPasswordDlg.Create(Forma); Forma.Caption := 'Validar Contrasenas'; Forma.FormStyle:=fsMDIForm; Forma.ShowModal; Regresaconecion:=Forma.TerminalLocal.Text; end;