Componente nao aparece no print

44 views
Skip to first unread message

Paulo Henrique

unread,
Nov 23, 2018, 10:14:45 AM11/23/18
to delphichromiumembedded
Boa tarde, Pessoal
Encontrei um erro interessante no Chromium

Ao você dar um print o componente esta la bonito e forte!
porem recentemente reselvi usar ele para construir um componente para fazer  mapas!

E ai tive a necessidade de tirar uma especie de PRINT so que so da parte do componente!

Coloquei ele em um PANEL com o nome de PANEL2 como podem ver no fonte abaixo porem ele mesmo estando dentro do PANEL é como se ele nao tivesse la na hora de dar o print!
Alguem sabe porque isso acontece e como resolver?


var
  Result: TBitmap;
begin
  Result := TBitmap.Create;
  try
    Result.Width := Self.Panel2.ClientWidth;
    Result.Height := Self.Panel2.ClientHeight;
    Result.Canvas.Brush := Self.Panel2.Brush;
    Result.Canvas.FillRect(Self.Panel2.ClientRect);
    Result.Canvas.Lock;
    Self.Panel2.PaintTo(Result.Canvas.Handle, 0, 0);
    Result.Canvas.Unlock;
    Result.SaveToFile('G:\PROGRAMACAO\Delphi\Componentes\Fontes\AOTI_WEBMAP\testePanel.bmp');
  finally
    Result.Free;
  end;
Reply all
Reply to author
Forward
0 new messages