Տուն
Top.Mail.Ru Moscow
Ֆորում: «Գլխավոր»;
Ընթացիկ արխիվը `2002.01.08;
Բեռնել: [xml.tar.bz2];

Down

Ստեղծեք բացվող ցուցակը StringGride- ում, DBGride- ում փնտրվող տիպի որոնումներից Գտնել նմանատիպ մասնաճյուղեր


Кто нибудь делал?   (2001-12-14 08:12) [0]

Ես փորձեցի ձև ստեղծել BorderStyle = bsNone- ով, իսկ դրա վրա ՝ ListBox, այն աշխատում է, բայց դրա արտաքին տեսքի ընթացքում ձևի վերնագիրը դառնում է ոչ ակտիվ:
Բաղադրիչներն օգտագործելիս նրանք չեն կարող դուրս գալ ձևից:
Միգուցե ինչ-որ մեկը արդեն հաղթահարել է դա:



Владислав   (2001-12-14 08:47) [1]

Կարո՞ղ եմ փորձել համատեքստի ընտրացանկը:



Кто нибудь делал?   (2001-12-14 09:04) [2]

Շնորհակալ եմ Վլադիսլավին:
Ես արդեն մտածել էի այդ մասին. Շտապում վերափոխումներով, ես պետք է, որ այն նորմալ դուրս գա ցուցակից:
Միգուցե պատուհանը ո՞ր ոճն է կարող սահմանել, որպեսզի հիմնականը չակտիվացնի:



Владислав   (2001-12-14 10:42) [3]

Ես կարող եմ ձեզ մի փոքր օրինակ նետել (շտապողականությամբ): Միգուցե ինչ-որ բան կօգնի:



Mark_a   (2001-12-15 11:16) [4]

Ձևը պետք է ունենա StringGrid և ComboBox
Օգտագործեք հետևյալ ծածկագիրը.

ընթացակարգ TForm1.FormCreate (Ուղարկող `TObject);
սկսել
The Սանրվածքի բարձրությունը «հնարավոր չէ փոխել, այնպես որ փոխարենը« սանրվածքի »փոխարեն: a
մենք փոխելու ենք ցանցի գծի բարձրությունը »a!
StringGrid1.DefaultRowHeight. = ComboBox1.Hight;
StringGrid1.Cells [3,0]: = "isուցակը այստեղ է";
{Թաքցնել combobox
ComboBox1.Visible: = կեղծ;
ComboBox1.Items.Add («Առաջին կետ»);
ComboBox1.Items.Add («Երկրորդ պարբերություն»);
վերջը.

կարգը TForm1.ComboBox1Change (Ուղարկող `TObject);
սկսել
Selected Ընտրված արժեքով ընտրվածը ComboBox- ից փոխանցելու ենք ցանցին}
StringGrid1.Cells [StringGrid1.Col, StringGrid1.Row]: =
ComboBox1.Items [ComboBox1.ItemIndex];
ComboBox1.Visible: = կեղծ;
StringGrid1.SetFocus;
վերջը.

ընթացակարգ TForm1.StringGrid1SelectCell (Ուղարկող `TObject; ACol,
Arow: Հետաքրքրություն; var CanSelect: Boolean);
էր
R: Ճշտել;
սկսել
եթե ((ACol = 3) և (ARow <> 0)), ապա
սկսեք
The ComboBox- ի լայնությունն ու դիրքը պետք է համապատասխանի
StringGrid բջջային}
R: = StringGrid1.CellRect (ACol, ARow);
R.Left. = R.Left + StringGrid1.Left;
R.Right. = R.Right + StringGrid1.Left;
R.Top. = R.Top + StringGrid1.Top;
R.Bottom: = R.Bottom + StringGrid1.Top;
ComboBox1.Left. = R.Left + 1;
ComboBox1.Top: = R.Top + 1;
ComboBox1.Width: = (R.Right + 1) - R.Left;
ComboBox1.Hight: = (R. Bottom + 1) - R.Top;
{Combուցադրել combobox
ComboBox1.Visible: = Trueիշտ;
ComboBox1.SetFocus;
վերջ
CanSelect: = True;
վերջը.



vlv   (2001-12-15 11:43) [5]

RX գրադարանում կա TPopupWindow- ի նման մի դասի ...



Էջեր: 1 ամբողջ ճյուղը

Ֆորում: «Գլխավոր»;
Ընթացիկ արխիվը `2002.01.08;
Բեռնել: [xml.tar.bz2];

Up





Հիշողություն `0.56 ՄԲ
Ժամանակը `0.023 գ
1-22247
ինչպես
2001-12-17 11:29
2002.01.08
Օգնություն մեկին կարող է .....


4-22512
Յարոսլավ
2001-10-31 13:17
2002.01.08
Ինչպես ստեղծել API- ի բաց կոճակ


7-22443
masik
2001-09-27 13:02
2002.01.08
PopUp մենյու Y2k


6-22285
Կենսական
2001-10-09 12:34
2002.01.08
Ընտրության խնդիր


1-22020
Լեո ^ Սան
2001-12-18 07:08
2002.01.08
Tmemo





afrikaans ալբանական արաբական հայերեն ադրբեջանական Բասկերի Բելառուսի Բուլղարիայի catalan Չինարեն (պարզեցված) Չինարեն (ավանդական) Խորվաթիայի չեխ դանիերեն հոլանդական Անգլերեն
Էստոնիայի filipino ֆիններեն ֆրանսերեն
galician վրացական գերմանական հունարեն haitian Creole եբրայերեն հինդի հունգարերեն icelandic հայերեն իռլանդական իտալական ճապոնացի Կորեայի Լատվիայի Լիտվայի մակեդոներեն Մալայերեն մալթերեն նորվեգական
պարսկական Լեհաստանի պորտուգալացի ռումինական ռուսական սերբերեն Սլովակիայի Սլովենիայի իսպաներեն սուահիլի շվեդերեն թայերեն թուրքական ուկրաինական ուրդու վիետնամերեն ուելսերեն հայերեն bengali բոսնիերեն
Cebuano Esperanto գուջարաթի հաուսա Hmong Igbo ճավաերեն kannada Khmer Lao լատիներեն մաորի մարաթի մոնղոլական նեպալերեն Punjabi Somali tamil telugu յորուբա
զուլուսերեն
Անգլերեն Французский Немецкий Итальянский Португальский Русский Испанский