Registriert seit: 2. Mär 2004
5.508 Beiträge
Delphi 5 Professional
|
AW: Gibt es sowas wie einen String-Index bei Propertys?
26. Okt 2012, 17:09
Du kannst doch gleich das TField-Object übergeben:
Delphi-Quellcode:
var t:TJob;
begin
//[...]TJob wird erzeugt[...]
for i:=1 to Query.Fields.Count-1 do
begin
t.AddField( Query.Fields[i]);
end;
....
procedure TJob.AddField(f:TField);
begin
SetParameter( {Name=}f.FieldName, {Value=}f.AsString);
end;
Andreas
|