Ver Mensaje Individual
  #3  
Antiguo 07-05-2007
Stilgar Stilgar is offline
Miembro
 
Registrado: may 2007
Posts: 21
Reputación: 0
Stilgar Va por buen camino
vaya... no se que estoy haciendo mal...


OraStoredProc1.Close;
OraStoredProc1.SQL.Add('SELECT DEFINICION FROM CUOTAS');
OraStoredProc1.Execute;
OraDataSource1.DataSet := OraStoredProc1;
DBGrid1.Datasource := OraDataSource1;

numkc := OraStoredProc1.RowsProcessed;
SetLength(KC,numkc);
i:=0;

//VALORES DEL LEFT Y DEL TOP
x:=115;
y:=59;

while not i<>numkc do
begin

//CONF DEL RADIOBUTTON
KC[i] := TRadioButton.Create(Self);
KC[i].Parent := Form1.GroupBox2;
KC[i].Height := 17;
KC[i].Width := 177;
KC[i].Left := x;
KC[i].Top := y+20;
KC[i].Caption := OraStoredProc1.FieldValues['DEFINICION'];
KC[i].Visible := true;
OraStoredProc1.Next;
Inc(i);
end;
Responder Con Cita