aşağıdaki kodu çalıştırdığımda "KODNUM" isimli field bulunamadı diye hata veriyor. select kodunu "select * from ABC" seklinde deil de select a, b, c, .... from ABC şeklindede yazdım. türlü şeyler denedim. olmadı. yine aynı hata. olayın şöyle bir de garip yanı var. alttaki "formfatura_kart.qFt.ParamByName" satırı iptal edince sorun düzeliyor.
Kod: Tümünü seç
formfatura_kart.qFt.Close;
formfatura_kart.qFt.GeneratorField.Generator:='GEN01ALFATURABASLIK';
formfatura_kart.qFt.GeneratorField.Field:='KODNUM';
formfatura_kart.qFt.SelectSQL.Clear;
formfatura_kart.qFt.ModifySQL.Clear;
formfatura_kart.qFt.InsertSQL.Clear;
formfatura_kart.qFt.DeleteSQL.Clear;
formfatura_kart.qFt.RefreshSQL.Clear;
formfatura_kart.qFt.SelectSQL.Add('Select * From TBL01ALFATURABASLIK');
formfatura_kart.qFt.ModifySQL.LoadFromFile(ExtractFilePath(Application.ExeName)+'\Sql\TBL01ALFATURABASLIKmodify.sql');
formfatura_kart.qFt.InsertSQL.LoadFromFile(ExtractFilePath(Application.ExeName)+'\Sql\TBL01ALFATURABASLIKinsert.sql');
formfatura_kart.qFt.DeleteSQL.LoadFromFile(ExtractFilePath(Application.ExeName)+'\Sql\TBL01ALFATURABASLIKdelete.sql');
formfatura_kart.qFt.RefreshSQL.LoadFromFile(ExtractFilePath(Application.ExeName)+'\Sql\TBL01ALFATURABASLIKrefresh.sql');
formfatura_kart.qFt.ParamByName('KODNUM').AsString:=qFt.FieldByName('KODNUM').AsString;
formfatura_kart.qFt.Open;
