Dúvida com a classe TClientDataSet

Delphi

22/04/2004

Preciso criar uma procedure que receba um componente ClientDataSet...
Por exemplo:

....


implementation

{$R *.dfm}

....


type
NovoClient=class(TClientDataSet);

....


procedure Exemplo(objeto: TClientDataSet);
begin
Edit1.Text:=IntToStr(NovoClient (objeto).Recno);
end;


......


Obs: O erro acontece em todas as linhas descritas...
Como poderia fazê-lo???
Desde já meus agradecimentos.

:twisted: :twisted: :twisted: :twisted: :twisted: :twisted: :twisted:
:arrow: g1b4


G1b4

G1b4

Curtidas 0

Respostas

Vinicius2k

Vinicius2k

22/04/2004

Colega,

Não entendi bem o que vc pretende fazer, mas... 
...
implementation

{$R *.dfm}

uses DB, DBClient;
type
  NovoClient = class(TClientDataSet);

procedure Exemplo(objeto: TClientDataSet);
begin
  Edit1.Text:=IntToStr(NovoClient(objeto).Recno);
end;
...


Para criar um TClientDataSet em Runtime vc precisa de referenciar na lista de uses as units [color=red:b9d9587c39]DB[/color:b9d9587c39] e [color=red:b9d9587c39]DBClient[/color:b9d9587c39].

T+


GOSTEI 0
G1b4

G1b4

22/04/2004

Cara, Valews mesmo





:D :D :D :D :D :D
>>g1b4


GOSTEI 0
POSTAR