mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-16 00:09:17 +02:00
+ Fix from Jesus Reyes to fix TfieldDefs.Assign
This commit is contained in:
parent
9eb3c1ced6
commit
240c5a96c2
@ -170,7 +170,7 @@ Var I : longint;
|
|||||||
|
|
||||||
begin
|
begin
|
||||||
Clear;
|
Clear;
|
||||||
For i:=1 to FieldDefs.Count-1 do
|
For i:=0 to FieldDefs.Count-1 do
|
||||||
With FieldDefs[i] do
|
With FieldDefs[i] do
|
||||||
Add(Name,DataType,Size,Required);
|
Add(Name,DataType,Size,Required);
|
||||||
end;
|
end;
|
||||||
@ -1865,7 +1865,10 @@ end;
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.15 2004-08-21 21:10:00 michael
|
Revision 1.16 2004-11-30 21:18:34 michael
|
||||||
|
+ Fix from Jesus Reyes to fix TfieldDefs.Assign
|
||||||
|
|
||||||
|
Revision 1.15 2004/08/21 21:10:00 michael
|
||||||
* Patch from Joost van der Sluis
|
* Patch from Joost van der Sluis
|
||||||
- Empty recordsets don't show any bogus data anymore
|
- Empty recordsets don't show any bogus data anymore
|
||||||
- Floatfiels.gettext fix
|
- Floatfiels.gettext fix
|
||||||
|
Loading…
Reference in New Issue
Block a user