Hi,
ich habe diesen Code:
Delphi-Quellcode:
procedure TForm2.Button2Click(Sender: TObject);
var
query:
string;
passwort:
string;
ex: boolean;
begin
query := ('
SELECT `passwort` FROM `user` WHERE 1 AND `user` LIKE "'+Edit1.Text+'
"');
//showmessage(query);
FResult := FMysql.query(
query, true, ex);
//Hier will ich prüfen ob die Variable leer ist, wenn sie leer ist wurde der Benutzername nicht //gefunden:
if -------(FResult)
then begin
passwort := FResult.FieldValue(0);
if strtoint(passwort) = strtoint(edit2.Text)
then
showmessage('
Eingeloggt')
else
showmessage('
Falsches Passwort!')
end
else
showmessage('
Falscher Benutzername!');
end;
Ich weis nicht wie ich prüfe ob die Variable leer ist!
Bin noch Anfänger in Delphi.
MFG
sungamer