Създаване на деца прозорци в Делфи, Делфи, Delphi компонент, източник Delphi
Създаване на деца прозорци в Делфи
Кликнете два пъти върху всяка от формите, ще се зареди форма дизайнер за редактиране на ръководителя на проекта. По принцип нова форма вече е отворена, и ние не трябва да се двойно кликване на мишката. Въпреки че можете да опитате и Delphi формуляр, за да отворите веднага за редактиране. По-късно, когато редактирате, че е полезно да се отвори за деца прозорци с изглед към промените.
Този прозорец ще се покаже информация за програмата, така да го наречем AboutUnit.pas. Модулът на основната форма за преименуване MainUnit.pas.
Този метод се затваря формата и ако затворите основната форма, тя ще се затвори цялото приложение.
Най-накрая трябва да се научите как да се свържете с меню за формата. Когато поставите нов MainMenu компонент на формата, тя автоматично ще се появи в менюто Form Свойства. Ако премахнете компонент името на този имот, менюто ще изчезне. Ако посочите друг компонент от менюто, а след това на компонента е да се използва и като меню за формата.
TIP. Не можеш просто да преименувате имената на модула. За тази цел, е желателно да се използва File | Save As (File | Save As).
Незабавно сменете името на формата и на ФОРМА2 с AboutForm. След това се промени формата на хедъра на За. Все още можете да украсявам по някакъв начин тази форма. TLabel инсталирате няколко компонента. да направите етикети. Но това няма значение. За нас най-важното - да се научат да работят с тези форми (например форма е показана на фиг.)
Сега трябва да покажем този прозорец. Нека да създадем манипулатор събитие # 111; nКликнете, за опцията в менюто За Нашата основна форма. Когато създавате манипулатор, процедура Delphi не ще изчисти името на вида N4ciick. Ако заглавието на менюто би бил написан на английски език, на името на манипулатора ще бъде малко по-очевидна, защото Delphi ще използва името на менюто и думата кликване. Но всички сме написали на родния си език, а му в кода не може да се използва, така че развитието на околната среда да се промени на буквата N с броя. Числото, което може да бъде различен. Съгласихме се, че всички ние ще се нарича приятелски имена, така че да го преименувате в инспектора на обект в Aboutciick. За да преименувате просто тип в обект инспектор новото име на следващия към събитието # 111; nКликнете, и натиснете
Сега в резултат манипулатор напише следното:
процедура TForm1.AboutClick (Sender: TObject);
AboutForm. ShowModa 1;
В този код, което наричаме прозорец showModai AboutForm. Този метод показва формата на режим Прехвърляне (Прехвърляне). В този режим на прозореца получава пълен контрол, и докато той е затворен, основната форма няма да работи.
Сега, ако се опитате да компилирате кода, вие ще получите съобщение за грешка. В Delphi 5, ще бъде грешка, което означава, че AboutForm не е намерен. Това е така, защото тази форма е описан в нашия Aboutunit модул, а ние го използвате в MainUnit. За да MainUnit SMOG uvi- сложи тези, описани в AboutUnit, трябва да го свържете. За да направите това, отидете на MainUnit модул и от менюто File (Файл), щракнете върху Използване единица (използвате модула). ще се отвори прозорец пред вас, както е показано на фиг. 9.10. В този прозорец, изберете модула, който искате да се свържете, и натиснете OK. Че след тази промяна? Нека да разгледаме следната част от нашия MainUnit модул:
Както можете да видите, има нов ред използва. Точно същото е и в началото на модула, но ние се свържете стандартни горни модула, необходими в описанието. Тук ние се свържете модулите, които се изискват само по време на изпълнението, както и саморъчни модули обикновено се отнася конкретно за това (не е задължително, но най-вече те са необходими само при изпълнението).
TIP. По принцип, можете да се свържете AboutUnit модул и в началото, но го прави не е желателно.
Line употреби също могат да бъдат написани на ръка в по-горе място и да не се предприемат никакви действия. Така че изберете кой метод предпочитате, - да се определи ръчно или автоматично да го направите с помощта на File | Използвайте Unit.
Сега отидете форма MainUnit на. Свързваме нашия модул AboutUnit и спокойно можем да използваме съдържанието.
Собствениците на Delphi 6 и по-високи са в по-удобна позиция. Ако сте пропуснали да свързвате устройството и се опита да компилира кода, в допълнение към грешката, ще видите прозорец със съобщение, както е показано на фиг. 9.11. Тук се казва, че сте извън основния модул се отнася до формата на AboutForm, която е обявена в AboutUnit модул. Можете също са поканени да се свържете модула. Ако кликнете Yes (Да), Delphi веднага направи всички стъпки, за да се свържете
Сега можете да компилирате кода отново, и програмата ще бъдат сглобени без грешка. Стартирайте приложението и се опитайте да изберете точката за. Ако сте направили всичко правилно, ще видите, втора форма, която сме създали.