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

Down

Ժողովուրդ, շատ հեշտ հարց: Կապը ընթացակարգին, մի խոսքով: Գտնել նմանատիպ մասնաճյուղեր


Serg5   (2001-12-19 15:14) [0]

ընթացակարգ TForm1.Button1Click (Sender: TObject);
էր
ա, բ: ամբողջ թիվ;
սկսել
a: = 3;
b: = 0;
b:=a*StrToInt(Edit4.Text)*StrToInt(Edit3.Text);
Label7.Caption:=IntToStr(b);
վերջը.

ընթացակարգ TForm1.Button2Click (Sender: TObject);
սկսել
Button1Click(); <<<< что тут ей написать???
վերջը.

Thank you!



tovSuhov   (2001-12-19 15:20) [1]

Կարող եք նշանակել Button1 սեղմեք օբյեկտի տեսուչի OnClick միջոցառմանը, եթե ձեզ հարկավոր չէ վերափոխել իրադարձությունները ժամանակի ընթացքում:



MBo   (2001-12-19 15:25) [2]

Sender и пиши, но проще как tovSuhov написал или задать (хоть в TForm1.Create)
Button2.Onclick:=Button1Click;



Alexander   (2001-12-19 15:51) [3]

Пиши Button1Click(Self);



Mick   (2001-12-19 15:59) [4]

В данном конкретном случае просто пиши Button1Click(nil);



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

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

Up









Հիշողություն `0.56 ՄԲ
Ժամանակը `0.029 գ
1-22259
Առնետներ
2001-12-12 17:55
2002.01.08
Dorisovka կորեր (կրկնակի 2)


3-21941
jin
2001-11-30 14:56
2002.01.08
Օգնություն խնդրում ենք ստեղծել IB SQL ընթացակարգը դիմումից


1-22082
Չակ
2001-12-19 10:07
2002.01.08
Ինչպես անցնել գործառույթի պարամետր DLL- ում


3-21947
Diehard
2001-12-05 13:18
2002.01.08
Acleուցանիշի ցուցակը վերցնելով Oracle աղյուսակից


1-22255
Դմիտրի Կատաեւը
2001-12-14 14:51
2002.01.08
Ինչպես իրականացնել IE նոր ընտրացանկի տարրը, որը կոչվում է աջ կոճակ (ինչպես օրինակ Ռեգետում)





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