Casa
Top.Mail.Ru Yandeks.Metrika
Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

Para baixo

Alguém já usou a função PaintTo para desenhar WinControl s na tela do bitmap? Ajuda! Eu não posso fazer nada. Encontre agências semelhantes


Kost   (2001-12-14 14:10) [0]

Alguém usou a função PaintTo para desenhar o WinControl na tela do bitmap? Ajuda! Eu não posso fazer nada.



valery_f   (2001-12-14 18:16) [1]

Usou. O único "mas" - o WinControl inicialmente invisível não tem um identificador e dá uma ação com o PaintTo. Se este for o seu componente - chame CreateHandle, se não - torne-o visível e depois oculte-o - a alça aparecerá e o PaintTo funcionará.



DK   (2001-12-15 03:52) [2]

2valery_f
Você pode questionar:
Como é isso? Há controle, mas não pega. Como isso pode ser?



Kost   (2001-12-15 13:05) [3]

Existe um formulário TForm1. BitBtn1 "botão experimental" é colocado sobre ele.
Há um desejo, clicando em outro botão - Button1 para fazer o seguinte:
- desenhar uma imagem BitBtn1 na tela do bitmap usando o PaintTo
- saída do bitmap recebido para a tela do formulário

NÃO RECEBIDO! BitBtn1 não é desenhado no bitmap! PORQUE ONDE ESTOU DIREITO?

procedimento TForm1.FormCreate (Sender: TObject);
começar
// Cria um bitmap
bmp: = TBitmap.Create;
bmp.Width: = 150;
bmp.Altura: = 150;
end;

procedimento TForm1.Button1Click (Sender: TObject);
começar
// Quando você clicar no botão, desenhe BitBtn1 na tela do bitmap
BitBtn1.PaintTo (bmp.Canvas.Handle, 0, 0);
Invalidar // Para forçar o formulário a ser redesenhado
end;

procedimento TForm1.FormPaint (Sender: TObject);
começar
// Imprime o formulário de bitmap para a tela
Canvas.Draw (0,0, bmp);
end;



DK   (2001-12-16 02:26) [4]

Tudo funciona !!!
Talvez você simplesmente não cuide de clicar em um botão?
procedimento TForm1. Button1Click(Remetente: TObject);
procedimento TForm1. BitBtn1Click(Remetente: TObject);



Kost   (2001-12-16 12:12) [5]

E ainda assim não funciona. O botão no bitmap não é desenhado. TPanel é desenhado, mas TButton e TBitBtn não são.



Страницы: 1 filial inteira

Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

em cima









Memória: 0.57 MB
Hora: 0.026 c
14-22415
Nariz molhado
2001-11-12 06:42
2002.01.08
Temas para WinXP


1-22246
Andrey196
2001-12-16 22:03
2002.01.08
Como criar um cursor de cor no editor de imagens da Borland


1-22135
Derzky
2001-12-19 19:51
2002.01.08
Como transferir o arquivo lançado para outra pasta?


1-22070
agarrar
2001-12-18 21:53
2002.01.08
gerenciamento de fontes com o menu POPUP


1-22063
Arte
2001-12-18 15:12
2002.01.08
E você pode bloquear o acesso à pasta, algo como fmShareExclusivo, mas para a pasta ???





afrikaans albanês Arabic armênio azerbaijano basco belarusian Bulgarian catalão Chinês simplificado) Chinês tradicional) croata checo dinamarquês Dutch Inglês estoniano filipino Finnish French
Galego georgiano German grego crioulo haitiano hebraico hindi húngaro islandês Indonesian irlandês Italian Japanese Korean letão lituano macedónio Malay maltês Norwegian
persa polonês Portuguese romeno Russa sérvio Slovak esloveno espanhol swahili sueco tailandês turco ucraniano urdu vietnamita galês ídiche bengali bósnio
cebuano esperanto gujarati hausa hmong igbo javanês kannada khmer lao latino maori marata mongol Nepali punjabi somali tâmil telugu yoruba
zulu
Английский francês Alemão Italiano Португальский russo Espanhol