Witam
Piszę program w delphi do odczytu czujnikow temperatury i chce dane eksportowac do bazy danych w internecie.
Baza internetowa jest utworzona przy pomocy phpMyAdmin.
W Delphi korzystam z dbExpress.
Dodawanie rekordów do tabeli działa, prawie bez zarzutów (polskie znaki zmieniaja się w ?).
Natomiast gdy chcę sciagnac dane z bazy i wyswietlic je w programie wyskakuje mi blad "[0x0005] Operation not suported".
Korzystalem z artykulu Rozdział 17.
Odczyt zrobilem tak jak autor pokazal i niestety nie dziala.
procedure TForm1.Button1Click(Sender: TObject);
begin
if MySQL.connected then
MySQL.Connected:=false
else
MySQL.Connected:=true;
end;
procedure TForm1.MySQLAfterConnect(Sender: TObject);
begin
Button1.Caption:='Rozłącz';
ZaladujTabele;
end;
procedure TForm1.MySQLAfterDisconnect(Sender: TObject);
begin
Button1.Caption:='Połącz';
end;
procedure TForm1.zaladujtabele;
var
i : Integer;
ListItem : TListItem;
begin
ListView1.Items.Clear;
SQL.CommandText := 'SELECT * FROM Uzytkownik'; // zapytanie
SQL.Open; // odczytaj dane
for I := 1 to SQL.RecordCount do
begin
{ dodaj kolejne wartości }
ListItem := ListView1.Items.Add;
ListItem.Caption := IntToStr(SQL.FieldValues['Id']);
ListItem.SubItems.Add(SQL.FieldValues['Imie']);
ListItem.SubItems.Add(SQL.FieldValues['Nazwisko']);
SQL.Next;
end;
SQL.Close;
end;
Czy ktoś ma jakiś pomysł?
pozdrawiam