Fórum Drag and Drop #158305
07/05/2003
0
Como faço pra deixar o usuário mexer nas labels e outros componentes num form, utilizando drag-and-drop?
Alterei a propriedade DragMode pra dmAutomatic mas num deu.
Alguém pode me dar uma idéia?? :D
Alterei a propriedade DragMode pra dmAutomatic mas num deu.
Alguém pode me dar uma idéia?? :D
Garibaldi
Curtir tópico
+ 0
Responder
Posts
07/05/2003
4_olho
O que você quer dizer com ´mexer nas labels e componentes´ ?
É só mudar de lugar ? Mudar as propriedades ? Mudar o conteúdo ? Mudar os eventos ?
É só mudar de lugar ? Mudar as propriedades ? Mudar o conteúdo ? Mudar os eventos ?
Responder
Gostei + 0
07/05/2003
Smaug_84
Faça o seguinte
ReleaseCapture;
PostMessage (Label1.Handle, WM_SYSCOMMAND, $F012, 0) ;
isto ja deve deixar o usuario mexer nos componentes em tempo de run-time
faca o teste
$F001 -- ESQUERDA
$F002 -- DIREITA
$F003 -- SUPERIOR
$F004 -- SUPERIOR ESQUERDO
$F005 -- SUPERIOR DIREITO
$F006 -- INFERIOR
$F007 -- INFERIOR ESQUERDO
$F008 -- INFERIOR DIREITO
QUALQUE PARAMETRO ACIMA DE $F008 FAZ COM QUE O USUARIO PASSA MOVER O COMPONENTE
ESPERO TER AJUDADO
SEMAIS DELONGAS SMAUG
ReleaseCapture;
PostMessage (Label1.Handle, WM_SYSCOMMAND, $F012, 0) ;
isto ja deve deixar o usuario mexer nos componentes em tempo de run-time
faca o teste
$F001 -- ESQUERDA
$F002 -- DIREITA
$F003 -- SUPERIOR
$F004 -- SUPERIOR ESQUERDO
$F005 -- SUPERIOR DIREITO
$F006 -- INFERIOR
$F007 -- INFERIOR ESQUERDO
$F008 -- INFERIOR DIREITO
QUALQUE PARAMETRO ACIMA DE $F008 FAZ COM QUE O USUARIO PASSA MOVER O COMPONENTE
ESPERO TER AJUDADO
SEMAIS DELONGAS SMAUG
Responder
Gostei + 0
07/05/2003
Garibaldi
Cara, brigadaum pela ajuda, vou testá-la agora. Mas pra entaum serve a propriedade DragMode = dmAutomatic se qdo tento carregar, no caso, um label, não funciona? Eu preciso fazer um programa em q o usuário possa carregar determinados componentes como nós fazemos no delphi :wink:
Valeu, vou testar agora.
t+
Valeu, vou testar agora.
t+
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)