y no es mas facil asi:
Código Delphi [-]var
nIdx: Integer;
begin
for nIdx:= 0 to pagecontrol1.PageCount - 1 do
pagecontrol1.Pages[nIdx].TabVisible := nIdx = DBCombobox1.ItemIndex;
end;
no hay que realizar tantas comparaciones
__________________
...Yo naci en esta ribera del arauca vibr@d0r
Soy hermano de la espuma,
de la garza, de la rosa y del sol...
Viva Venezuela
|