Databasede speed değeri 60, veriyi çektikten sonra Second ile 000 daha eklemet isitiyorum; Fakat ne yaptıysam 60000 değerini alamıyorum 60 olalarak showmessageye yansıyor bu sorun neden kaynaklı oluyor?
Kod: Tümünü seç
procedure TMainForm.LOpenClose(Sender: TObject);
var
FDQ: TFDQuery;
Second: Integer;
begin
Second := 000;
FDQ := TFDQuery.Create(Self);
try
FDQ.Active := False;
FDQ.Close;
FDQ.SQL.Clear;
FDQ.SQL.Add('Select * From Fiyat');
FDQ.Prepared := True;
FDQ.Open;
showmessage(IntToStr(FDQ.FieldByName('speed').AsInteger + Second));