10- mavzu. Delphi dasturlash muhitida tarmoq operatorlari Savollar

RadioGroup – bu komponent ko‘rinib turuvchi ro‘yxatdan tanlash (ro‘yxat oldiga nuqta qo‘yish) orqali kerakli
ro‘yxat elementini tanlaydi.

1 Items
2 ItemIndex
3 Font
4 Caption
Ro‘yxat elementlari.
Ro‘yxat elementi raqami.
Ro‘yxat shriftiga oid xossalar.
Ro‘yxat sarlavhalari.

ColorBox – bu komponent osiluvchi ro‘yxat bo‘lib, ranglar ro‘yxatini saqlaydi. Ro‘yxatdan kerakli rang
tanlanadi. Maydonda shu rang nomi va rang hosil bo‘ladi.

1 DropDownCount
2 Cursor
3 Font
4 Color
Osilib ko‘rinuvchi ro‘yxat elementlari soni.
Komponent ustida kursorni ko‘rinishi.
Ro‘yxat shriftiga oid xossalar.
Ro‘yxat foni rangi.

Quyida CASE ko‘rsatmasi bilan birga foydalanish mumkin bo‘lgan bir nechta
komponentlar ishtirok etgan misol keltirilgan.

Muhitdagi ko‘rinishi.

Dastur ishga tushirilgan vaqtdagi ko‘rinishi. Dastur ishi vaqtidagi ko‘rinishi.

unit Unit1;

interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls, MPlayer;
type
TForm1 = class(TForm)
ListBox1: TListBox;

5

ComboBox1: TComboBox;

Label1: TLabel;
Label2: TLabel;
Panel1: TPanel;
Panel2: TPanel;
Panel3: TPanel;
Panel4: TPanel;
Image1: TImage;
Image2: TImage;
Image3: TImage;
Image4: TImage;
ColorBox1: TColorBox;
MediaPlayer1: TMediaPlayer;
RadioGroup1: TRadioGroup;
MediaPlayer2: TMediaPlayer;
Panel5: TPanel;

procedure ListBox1Click(Sender: TObject);
procedure ComboBox1Change(Sender: TObject);
procedure ColorBox1Change(Sender: TObject);
procedure RadioGroup1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation
{$R *.dfm}