MyDAC w DELPHI 7 Logowanie do programu

MyDAC w DELPHI 7 Logowanie do programu
PO
  • Rejestracja:ponad 13 lat
  • Ostatnio:ponad 13 lat
  • Postów:7
0

Witam, to mój pierwszy program oparty o baze danych MySQL i mam jeden zasadniczy problem.
Mam stronę postawioną na Joomla 1.5 i zależy mi na tym alby konta utworzone na tej stronie, były też kontami do programu pozwalającymi na logowanie, pobierającymi informacje z tabeli jos_users.
Z bazą danych już się połączyłem, dodatałem do programu tabele, ale nie wiem jak napisać kod żeby odczytać rekordy z tabeli użytkowników po naciśnięciu buttona.
Z góry dzięki za pomoc.
Pozdrawiam!

MG
  • Rejestracja:ponad 19 lat
  • Ostatnio:ponad 7 lat
  • Postów:29
0

"Jeżeli miałbyś 1.000.000.000 komputerów, które próbkowałyby 1.000.000.000 klawiszy na sekundę, to znalezienie klucza kodowania trwałoby dłużej niż istnieje wszechświat"
PO
  • Rejestracja:ponad 13 lat
  • Ostatnio:ponad 13 lat
  • Postów:7
0

Mam problem wyświetla mi błąd...
Kod procedury dodawania rekordów
Modul - nazwa formy DataModule

procedure TForm2.Button2Click(Sender: TObject);
begin
Modul.ZConnection1.Connect;
Modul.ZQuery1.SQL.Clear;
Modul.ZQuery1.SQL.Add('INSERT INTO jos_users(id,name,username,email,password) VALUES(0, :name,username,email,password)');
Modul.ZQuery1.ParamByName('name').AsString := edNick.Text;
Modul.ZQuery1.ParamByName('username').AsString := edUsername.Text;
Modul.ZQuery1.ParamByName('email').AsString := edMail.Text;
Modul.ZQuery1.ParamByName('password').AsString := edPass.Text;
try
Modul.ZQuery1.ExecSQL;
Modul.ZQuery1.Close;
Modul.ZQuery1.SQL.Clear;
Modul.ZQuery1.SQL.Add('select * from jos_users');
Modul.ZQuery1.Open;
except
ShowMessage('Błąd.');
end;
end;

po wciśnieciu buttona2 wyświetla się :
user image

po wciśnieciu OK na błędzie wyświetla się w zakładce:
user image

Proszę o pomoc.

Już sobie poradziłem, można zamknąć

edytowany 2x, ostatnio: poczatek

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.