Portál AbcLinuxu, 26. května 2024 11:03
iniRead('config.ini'); LazSerial1.Device:= SerPort; SQLConnector1.HostName:= DB_Host; SQLConnector1.DatabaseName := DB_Name; SQLConnector1.UserName:= DB_User; SQLConnector1.Password:= DB_Pass;Samotnou query spracovavam podle examplu na wiki
if SQLConnector1.Connected then begin Query := 'select * from cards where `cardID`='''+Form1.Edit1.Text+''';'; SQLQuery1.SQL.Text := Query; try SQLQuery1.Open; SQLQuery1.First; while not SQLQuery1.EOF do begin ..... ..... ..... ..... SQLQuery1.Next; end; SQLQuery1.Close; except Form1.Edit2.Text := 'Chyba - nelze se připojit k DB'; end; end;Ale nejak ho musim donutit, aby se propojil k IP, co si nacetl v configu a ne co je v kodu jako default.
Tiskni Sdílej:
ISSN 1214-1267, (c) 1999-2007 Stickfish s.r.o.