[fpc-devel]ClrScr bug in crt unit (win32 1.0.7 )
I noticed that the crt.ClrScr (win32) in 1.0.7 is buggy. Take a look at the following program: uses crt; vari,j: integer; begin for i :=1 to 25 do begin window(1,1,80,25); textattr:=7; clrScr; window(1,1,i,i); textAttr:=31; clrScr; for j := 1 to i do begin gotoxy(1,j); write(i); gotoxy(j,1); write(i); end; readkey; end; ClrScr; readkey; end. The problem occur when the height of the window is 3, 4, 5, 6 or 8. I'm sending a patch that resolves this bug I hope it can be useful. BTW the win32 crt unit of the main branch is quite outdated. Karl Brandt __ E-mail Premium BOL Antivírus, anti-spam e até 100 MB de espaço. Assine já! http://email.bol.com.br/ clrwin32.zip Description: Binary data
[fpc-devel]test please ignore
send with pascalive via web __ Acabe com aquelas janelinhas que pulam na sua tela. AntiPop-up UOL - É grátis! http://antipopup.uol.com.br/ ___ fpc-devel maillist - [EMAIL PROTECTED] http://lists.freepascal.org/mailman/listinfo/fpc-devel
[fpc-devel] Small issue in win32 package of fpc 1.9.6
I installed fpc-1.9.6.i386-win32.zip just fine. The only problem is that the pdf docs were put in base directory instead of doc dir. Using windows XP sp2 Luiz __ Acabe com aquelas janelinhas que pulam na sua tela. AntiPop-up UOL - É grátis! http://antipopup.uol.com.br/ ___ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
[fpc-devel] Another small issue in win32 package
The precompiled units of sqlite, cdrom ,odbc, winver and tcl comes in the install file (fpc-1.9.6.i386-win32.zip) but arent installed in the units folder. Luiz Americo __ Acabe com aquelas janelinhas que pulam na sua tela. AntiPop-up UOL - É grátis! http://antipopup.uol.com.br/ ___ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
[fpc-devel] Resource string in TStringList
Some time ago there was a discussion about the use of Resource string in TList that resulted in a modification in TList.Get function (Created TList.RaiseIndexError function). I think that the same could be done in TStringList (i noticed that TStringList.Get function still uses resource string directly, at least in fpc 1.9.6 source package). How about doing the same for TStringList.Add at line 917 of stringl.inc [DupError : Error(SDuplicateString,0)] ?? Thanks Luiz Americo __ Acabe com aquelas janelinhas que pulam na sua tela. AntiPop-up UOL - É grátis! http://antipopup.uol.com.br/ ___ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
[fpc-devel] Another suggestion for TList
How about changing the Error(SlistIndexError,[AIndex]) calls to RaiseIndexError(Index : Integer) calls in Delete,Exchange,Insert,Move methods of TList class? The same goes to TStringList class PS: I am not sending patches because i dont compile the compiler/rtl from sources, so i can't test them. But if desired i can send untested patches. Luiz Americo __ Acabe com aquelas janelinhas que pulam na sua tela. AntiPop-up UOL - É grátis! http://antipopup.uol.com.br/ ___ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
Re: [fpc-devel] Resource string in TStringList
> pascalive wrote: > > Some time ago there was a discussion about the use of Resource string in > > TList that resulted in a modification in TList.Get function (Created > > TList.RaiseIndexError function). I think that the same could be done in > > TStringList (i noticed that TStringList.Get function still uses resource > > string directly, at least in fpc 1.9.6 source package). > > > > How about doing the same for TStringList.Add at > > line 917 of stringl.inc [DupError : Error(SDuplicateString,0)] ?? > > > > AFAIK, this is not necessary any more, because the compiler has been > improved and now there no implicit try..finally block generated for > resourcestrings. > > Vincent. Even better :-). Please desconsider the other post i did Luiz. __ Acabe com aquelas janelinhas que pulam na sua tela. AntiPop-up UOL - É grátis! http://antipopup.uol.com.br/ ___ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
[fpc-devel] DisableControls and ControlsDisabled method/property of TDataset
Recently the mentioned method/property was added to Tdataset. I'd like to know what's the behavior of them: when is supposed to be called, whats the consequence... I'm mantaining the sqlite wrapper (TDataset) and would like to know if its necessary to modify something in it Thanks Luiz Americo __ Acabe com aquelas janelinhas que pulam na sua tela. AntiPop-up UOL - É grátis! http://antipopup.uol.com.br/ ___ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
[fpc-devel] Some thoughts about TFPList
I noticed that TFPList class was added in cvs version as a way to get rid of Notify performance penalty. I suggest to remove TFPList.Grow method since its only for Delphi compability (but Delphi doesnt have TFPlist) and AFAIK virtual methods add some degree of performance hit. Luiz __ Acabe com aquelas janelinhas que pulam na sua tela. AntiPop-up UOL - É grátis! http://antipopup.uol.com.br/ ___ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
[fpc-devel] Patch to sqliteds and db units
Here's a patch that does the following in *sqlite*ds: - Change the way the database handle is retrieved - Makes CreateBlobStream handle bmWrite mode properly - Makes changes in Get/SetFieldData to adapt to recent changes in TDataset - Small refactorings and some debug info tweaks BTW: As suggestions to the recent changes made in TDataset, please consider the following (patches in db.zip): - Make TField.GetData(Buffer: Pointer) and TField.SetData(Buffer: Pointer) inlined (reduces function call overhead without increasing size) - Changes the order of the "if" in GetData so it evaluates to true in most frequent situation Luiz Americo <> <> ___ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
[fpc-devel] Internal error 200311075 with fpc202 under windows
I get this error when i follow these steps: 1 - in an empty dir add the files: chrono2db.pas , chronolog.pas and Thomas Schatzl cpu unit (basetype.pas, cpu.pas,mmx.pas,platform.inc) found at http://members.yline.com/~tom_at_work/cpudist.zip 2 - compile chrono2db.pas using commandline (fpc chrono2db.pas) 3 - First compile is OK but the subsequent gives the internal error. Deleting the object files makes compile again. Using fpc202, under windowsXP, with no modifications in config file. Luiz <> ___ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
[fpc-devel] Patch to sqliteds and db units
I'm sending two patches: sqliteds.zip which applies to sqlite*ds units and db.zip which applies to db unit. While the second is only minor performance tweaks, i recommend applying the first one since it fixes a bug that can lead to data loss Changes in sqliteds.zip: - Change the way the database handle is retrieved - Makes CreateBlobStream handle bmWrite mode properly - Makes changes in Get/SetFieldData to adapt to recent changes in TDataset - Changed the order of the updates (delete,insert,updates) to prevent data loss in some situations - Performance improvement to ApplyUpdates - Small refactorings and some debug info tweaks Changes in db.zip: - Make TField.GetData(Buffer: Pointer) and TField.SetData(Buffer: Pointer) inlined (reduces function call overhead without increasing size) - Changes the order of the "if" in GetData so it evaluates to true in most frequent situation Luiz Americo <> <> ___ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
