Ir para conteúdo
Faça parte da equipe! (2024) ×
Conheça nossa Beta Zone! Novas áreas a caminho! ×
  • Quem está por aqui   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.

[Tutorial] Form Modelado [DELPHI]


~ Heatlex.
 Compartilhar

Posts Recomendados

Necessário:

1 TForm

1 TImage

 

 

Function:

function brcode(hBmp: TBitmap; TransColor: TColor): HRGN;

var

aboult : HRGN;

Image1 : TImage;

Handle : THandle;

begin

Handle := Form1.Handle;

Image1 := Image1;

aboult:= Brcode(Image1.Picture.Bitmap,Image1.Canvas.Pixels[0,0]);

SetWindowRgn(Handle,aboult,True);

end;

 

Créditos: Jack & Aboult

Link para o comentário
Compartilhar em outros sites

  • Velha Guarda Ex-Staffer

Conteúdo já existente, antes de postar um tópico, certifique-se que ele ainda não foi postado, para isto, use a ferramenta Pesquisar.

 

Fechado.

4b0a63ecdfb46d12255752f0fec82014303e7680

 

 

Link para o comentário
Compartilhar em outros sites

Este tópico está impedido de receber novos posts.
 Compartilhar

×
×
  • Criar Novo...

Informação Importante

Nós fazemos uso de cookies no seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies , caso contrário, vamos supor que você está bem para continuar.