var
TabSheet : TTabSheet;
ct : integer;
begin
for ct := 0 to 3 do
begin
TabSheet := TTabSheet.Create(self);
TabSheet.Caption := 'teste';
TabSheet.PageControl := PageControl1;
(* Suas propriedades do tabSheet *)
with TStringGrid.Create(Self) do
begin
Parent := TabSheet;
(* Suas propriedades do StringGrid *)
end;
end;
Tem que adicionar as units ComCtrls e Grids no uses.
Abs.
Em 21/05/07, BandaLemuel <[EMAIL PROTECTED]> escreveu:
>
> Lista é o Seguinte...
>
> Preciso criar um aplicativo que crie as paginas ou do PageControl ou do
> TabControl.. e dentro de cada pagina ele insira um StringGrid.. vcs podem me
> ajudar.. nem tenho ideia como fazer....
>
> vlw..
>
> Wesley
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
[As partes desta mensagem que não continham texto foram removidas]
