12-02-2019, 01:36 PM
My desktop app works OK, but when I tried to move the code to intraweb I got many errors, "unknown identifiers"
"canvas has no brush class"
starting from
napis.PixelFormat:= pf24bit; "property is read only"
intraweb 15.1.5 delphi xe7
uses
FMX.graphics;
var
napis:= TBitmap;
napis:= TBitmap.Create;
napis.PixelFormat:= pf24bit;
napis.Canvas.Brush.Color := RGB(50,50,50);
napis.Canvas.Brush.Style := bsSolid;
napis.Width:= zdjęcie.Width;
napis.Height:= zdjęcie.Height;
napis.Canvas.FillRect(Rect(0,0,napis.width-1,napis.height-1));
napis.Canvas.Font.Quality:= fqAntialiased;
napis.Canvas.Font.Size:=68;
napis.Canvas.Font.Name:='Microsoft Sans Serif';
"canvas has no brush class"
starting from
napis.PixelFormat:= pf24bit; "property is read only"
intraweb 15.1.5 delphi xe7
uses
FMX.graphics;
var
napis:= TBitmap;
napis:= TBitmap.Create;
napis.PixelFormat:= pf24bit;
napis.Canvas.Brush.Color := RGB(50,50,50);
napis.Canvas.Brush.Style := bsSolid;
napis.Width:= zdjęcie.Width;
napis.Height:= zdjęcie.Height;
napis.Canvas.FillRect(Rect(0,0,napis.width-1,napis.height-1));
napis.Canvas.Font.Quality:= fqAntialiased;
napis.Canvas.Font.Size:=68;
napis.Canvas.Font.Name:='Microsoft Sans Serif';