Alqoritm, xassələri və təsvir üsulları


Delete (index : integer); proseduru - index parametri ilə göstərilən nömrəli



Yüklə 2,19 Mb.
səhifə107/125
tarix07.01.2024
ölçüsü2,19 Mb.
#205155
növüYazı
1   ...   103   104   105   106   107   108   109   110   ...   125
aminlazım

Delete (index : integer); proseduru - index parametri ilə göstərilən nömrəli
elementi pozur.
Misal. ComboBoxl. Items. Delete (4) ;
Clear; - proseduru bütün elementləri pozaraq siyahını təmizləyir.
Move (Curlndex, Nevvlndex : integer); proseduru - Curlndex nömrəli elementi Newlndex nömrəli mövqeyə yerləşdirir.
IndexOf (const s : string) : integer; proseduru - siyahıda s sətrinin olmasını yoxlayır. Əgər siyahıda belə bir sətir tapılarsa, həmin sətrin nömrəsi, əks halda isə (1) qiyməti göstərilir.
Siyahı və mətn redaktorlarının tətbiqinə aid misallar
Misal. Sadə siyahıya elementlərin əlavə edilməsi və onların seçilməsi.
Forma üzərində ListBox, Button və Label komponentləri yerləşdirin. Button düyməsinin sərlövhəsini Əlavə et... adlandırıb, OnClick hadisəsini aktivləşdirərək yazın:
ProcedureTForml.ButtonlClick(Sender:TObject);
Var i : Longlnt; // Dəyişən ixtiyari ola bilər
begin for i:=0 to 100 do
ListBoxl.Items.Add('Sətir № +IntToStr(i));
SendMessage(ListBoxl.Handle,
LB_SetHorizontalExtent, 1000,0); ListBoxl.Itemlndex:=0; end;
F9 klavişini basaraq layihəni yerinə yetirin. Siz Əlavə et... düyməsini hər dəfə basdıqda siyahıya 101 sətir əlavə olunacaq, maus və ya klaviatura ilə bu elementlərdən hər hansı birini seçdikdə Label yazısı üzərində onun nömrəsi və məzmunu təsvir olunacaqdır.
Misal. Sadə siyahının redaktə komponentləri ilə əlaqəsi.
Forma üzərində göstərilən komponentləri yerləşdirin. Burada aşağıdakı komponentlər təsvir edilmişdir: 1-Memol; 2-ListBoxl; 3-Editl; 4-Labell; 5-9- Buttonl- Button5; 10 - Samples səhifəsindən SpinEditl.
procedure TForml.EditlExit(Sender: TObject);
Var
s: String;
begin s:= Editl.Text; s:= Trim(s);

Yüklə 2,19 Mb.

Dostları ilə paylaş:
1   ...   103   104   105   106   107   108   109   110   ...   125




Verilənlər bazası müəlliflik hüququ ilə müdafiə olunur ©azkurs.org 2024
rəhbərliyinə müraciət

gir | qeydiyyatdan keç
    Ana səhifə


yükləyin