Delphi - Ayuda, Ayuda... error en este código

 
Vista:

Ayuda, Ayuda... error en este código

Publicado por Nancy Paola (2 intervenciones) el 29/10/2007 21:57:42
Porque me marca error en el if. ¿Acaso, tengo mal el operador lógico =?

Ayudenme porfa.... Díganme cual es el error, eso es lo unico que me falta por corregir de un monton de código y de unit's.

Yo se que ha de ser un error simple, pero no me doy cuenta porque ya estoy cansada...

este es el código:

procedure TFrmConfirmarAdministrador.CmdConfirmarClick(Sender: TObject);
var
NombreAdministrador: string;
ClaveAdministrador: string;

begin

//Validar Datos del Administrador
NombreAdministrador:='vianey';
ClaveAdministrador:='02010180';

if (self.TxtNombreAdministrador = NombreAdministrador) and (self.TxtClaveAdministrador = ClaveAdministrador) then
begin
FrmMenuAdministrador.ShowModal;
end
else
begin
showmessage('Nombre y/o Clave incorrecto(s). Vuelve a intentar.');
self.Close;
end;
end;
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

RE:Ayuda, Ayuda... error en este código

Publicado por jose luis (157 intervenciones) el 30/10/2007 12:39:38
Cual es el error que te dice el delphi, me imagino que TxtNombreAdministrador, TxtClaveAdministrador son Edit, si es asi te falta la propiedad .Text
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar