A bug or i m doing something wrong | MemDataSet
lazarus / 16-Databases

----------------------------------------------------------------------
cpalx · 2015-04-23 22:16

Lazarus: 1.2.4
FPC: 2.6.4
SO: Ubuntu(KDE)  and Windows 2008



Code: [Select]   MymemDataSet.FieldDefs.Add( 'Names', ftString );
   MymemDataSet.Active := true;

for i:= 0 to 10 do begin
   MymemDataSet.insert;
   MymemDataSet.FieldByName( 'Names' ).AsString:= 'This is a test ' +
IntToStr( i );
   MymemDataSet.post

end;
This Add 11 records, by all of them are empty

if a change by Integer, the inserts are OK.

----------------------------------------------------------------------
miab3 · 2015-04-23 22:58

Try:

Code: [Select]...
MymemDataSet.FieldDefs.Add( 'Names', ftString, 30 ); // <<== add , 30
...
Michal

----------------------------------------------------------------------
cpalx · 2015-04-23 23:02

Thanks