Cara Membuat Ukuran Object dengan Delphi 7

Objeck yang digunakan:
1.RadioGroup

Langkahnya sebagai berikut:
1.Buat Objek pada form
2.Cari Item pada Object Inspector,klik "Sting".Akan Muncul String List Editor.
3.Masukan/ketikan di kotak dialog String List Editor Tersebut.Klik OK.

4.kLIK 2X Objek RadioGroup,Isikan Script dibawah ini:

procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
Case RadioGroup1.itemindex of
0:
begin
RadioGroup1.Height:=150;
RadioGroup1.Width:=300;
end;
1:
begin
RadioGroup1.Height:=300;
RadioGroup1.Width:=150;
end;
end;
end;
end.

5. Tekan F9 Untuk mencobanya.


DoWNLOAD filenya disini!!!!!