Editor turns black, if width increases about atsynedit HOT 6 CLOSED

hm.. I see 150cols, demo_load app. Ok.. Win7

from atsynedit.

How to see it here?

from atsynedit.

I build with different set of options -Criot with/without... Always happens.
fpc 2.6.4
Lazarus 1.5 trunk, 48628

I use the text, that is loaded initially (default demo text). It happens at the same pixel width, even with a bigger font. So it is not related to the amount of text columns.

It happens when the bitmap is resized.

from atsynedit.

better this??

procedure TATSynEdit.DoOnResize;
var
  SizeX, SizeY: integer;
begin
  inherited;

  if Assigned(FBitmap) then
  begin
    SizeX:= ((Width div cResizeBitmapStep)+1)*cResizeBitmapStep;
    SizeY:= ((Height div cResizeBitmapStep)+1)*cResizeBitmapStep;
    if (SizeX>FBitmap.Width) or (SizeY>FBitmap.Height) then
      FBitmap.SetSize(SizeX, SizeY);
  end;

  Invalidate;
end;

from atsynedit.

No, but this works:

if Assigned(FBitmap) then
begin
SizeX:= ((Width div cResizeBitmapStep)+1)_cResizeBitmapStep;
SizeY:= ((Height div cResizeBitmapStep)+1)_cResizeBitmapStep;
if (SizeX>FBitmap.Width) or (SizeY>FBitmap.Height) then begin
FBitmap.SetSize(SizeX, SizeY);
FBitmap.FreeImage; // <<<<<<<<<<<<<<<<<<<
end;
end;

I am not sure, if this should be required, or if it is a bug in TBitMap

from atsynedit.

weird. will do.

from atsynedit.