Alguém pode ajudar?
-
RODRIGO G. CUNHA
2009/3/27 Rodrigo Guimaraes
> fala humberto,
>
> cara testei o exemplo e nada aconteceu.
> clicko no shape e nada acontece, abraço
> -
> RODRIGO G. CUNHA
>
>
> 2009/3/27 humberto sales de oliveira
>
> unit Unit1;
>> interface
>> uses
>> Windows,
fala humberto,
cara testei o exemplo e nada aconteceu.
clicko no shape e nada acontece, abraço
-
RODRIGO G. CUNHA
2009/3/27 humberto sales de oliveira
> unit Unit1;
> interface
> uses
> Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
> Dialogs, ExtCtrls;
>
> ty
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls;
type
TForm1 = class(TForm)
Shape1: TShape;
procedure FormCreate(Sender: TObject);
private
procedure shapeClick(Sender: TObject);
public
{ Public declar
Fala galera blz?
seguinte, preciso que um shape tenha um evento
de double click. como faço para adicionar este
evento ao componente?
se alguém puder dar uma luz agradeço.
4 matches
Mail list logo