Çàî÷íîå äèñòàíöèîííîå îáðàçîâàíèå ñ ïîëó÷åíèåì ãîñóäàðñòâåííîãî äèïëîìà ÷åðåç Internet










Ïîëó÷èòü èíôîðìàöèþ î ïîñòóïëåíèè
 
Ãëàâíàÿ Íîâîñòè Êàðòà ñàéòà Ôîòîàëüáîì Ãîñòåâàÿ êíèãà Êîíòàêòû

 

Óïðàâëÿþùèå êîíñòðóêöèè ñðåäû ïðîãðàììèðîâàíèÿ Delphi 7

Ðàçðàáîòàòü ïðîãðàììó äëÿ âû÷èñëåíèÿ àðèôìåòè÷åñêîãî âûðàæåíèÿ è âûâîäà ïîëó÷åííîãî ðåçóëüòàòà.
 

Ïîðÿäîê âûïîëíåíèÿ çàäàíèÿ:

1. Çàïóñòèòü Delphi (Ïóñê – Âñå ïðîãðàììû – Borland Delphi 7 – Delphi 7).

2. Óêàçàòü çàãîëîâîê ôîðìû (ñâîéñòâó Caption óñòàíîâèòü çíà÷åíèå «Âû÷èñëåíèå çíà÷åíèÿ âûðàæåíèÿ») è ðàçìåñòèòü íà íåé êîìïîíåíòû äëÿ ââîäà èñõîäíûõ äàííûõ (êîìïîíåíò Edit1 è Edit2) è âûâîäà ðåçóëüòàòà (êîìïîíåíò Edit3). Ñâîéñòâî Text êîìïîíåíòîâ Edit1, Edit2 è Edit3 îñòàâèòü ïóñòûì. Äëÿ êàæäîãî êîìïîíåíòà óêàçàòü êîììåíòàðèé â âèäå ìåòêè (Label1 (Caption=«X=»), Label2 (Caption=«Y=») è Label3(Caption=«Ðåçóëüòàò»)). Èçìåíèòü ñâîéñòâî Position ôîðìû Form1, òàê, ÷òîáû ïðè çàïóñêå ïðîãðàììû ôîðìà îòêðûâàëàñü â öåíòðàëüíîé ÷àñòè ýêðàíà. Èçìåíèòü ðàçìåðû ôîðìû.

3. Íà ôîðìå ðàñïîëîæèòü êíîïêó Button1. Ñâîéñòâó Caption êíîïêè óñòàíîâèòü çíà÷åíèå «Âû÷èñëèòü». Äëÿ ýòîãî êîìïîíåíòà ñîçäàòü ñîáûòèå äëÿ ðàñ÷åòà çíà÷åíèÿ èñõîäíîãî âûðàæåíèÿ. Äëÿ ýòîãî íåîáõîäèìî äâàæäû ùåëêíóòü ëåâîé êëàâèøè ìûøè.  ðåçóëüòàòå îòêðîåòñÿ ìîäóëü ôîðìû Unit1, ãäå óæå áóäåò ïðîïèñàíà ïðîöåäóðà äëÿ îáðàáîòêè ñîáûòèÿ íàæàòèÿ íà êíîïêó – procedure TForm1.Button1Click(Sender: TObject).  ýòîé ïðîöåäóðå â ðàçäåëå îïèñàíèÿ ïåðåìåííûõ ïåðå÷èñëèòü èñïîëüçóåìûå ïåðåìåííûå è óêàçàòü èõ òèï (ïåðåìåííûå X è Y – öåëûå, à ïåðåìåííàÿ Z – ðåçóëüòàò âû÷èñëåíèé).  òåëå ïðîöåäóðû (ìåæäó îïåðàòîðàìè Begin è End) íàïèñàòü òåëî ïðîãðàììû:

– ïåðåìåííûì X è Y ïðèñâîèòü çíà÷åíèÿ, êîòîðûå ââîäÿòñÿ â êîìïîíåíòû Edit1 è Edit2 (ñâîéñòâî Text), ñîîòâåòñòâåííî, ñäåëàâ ïåðåâîä èç ñòðîêîâîãî òèïà äàííûõ â ÷èñëîâîé, ïîñêîëüêó êîìïîíåíò Edit âîçâðàùàåò ñòðîêîâûé òèï äàííûõ (äëÿ ïåðåâîäà ìîæíî èñïîëüçîâàòü ôóíêöèþ StrToInt);

– âû÷èñëèòü çíà÷åíèå âûðàæåíèÿ è ðåçóëüòàò çàïèñàòü â ïåðåìåííóþ Z (ïðè âû÷èñëåíèè íåîáõîäèìî èñïîëüçîâàòü îïåðàòîð óñëîâèè If);

– âûâåñòè çíà÷åíèå ïåðåìåííûé Z â êîìïîíåíò Edit3, ïðè ýòîì íåîáõîäèìî ïðåîáðàçîâàòü âåùåñòâåííûé òèï äàííûõ â ñòðîêîâûé (èñïîëüçóåòñÿ ôóíêöèÿ FloatToStr).

4. Ïðîâåðèòü ïðîãðàììó íà íàëè÷èå îøèáîê è â ñëó÷àå èõ îáíàðóæåíèÿ óñòðàíèòü.

5. Çàïóñòèòü ïðîãðàììó íà âûïîëíåíèå (âûïîëíèòü êîìàíäó Run – Run èëè íàæàòü êëàâèøó F9 èëè íà ïàíåëè èíñòðóìåíòîâ íàæàòü íà êíîïêó «Çåëåíûé òðåóãîëüíèê»).

6. Ñîõðàíèòü ïðîãðàììó â îòäåëüíîé ïàïêå. Äëÿ ýòîãî íåîáõîäèìî ñîõðàíèòü âåñü ïðîåêò ñ ïîìîùüþ êîìàíäû File – Save All.



 
     
   
 


Ïðèãëàøàåì ïðèíÿòü ó÷àñòèå â êðóãëîì ñòîëå!
ïîäðîáíåå   >>>
 

Èíñòèòóò Ìåíåäæìåíòà, Ýêîíîìèêè è Èííîâàöèé íà÷èíàåò íàáîð íà êóðñû ïîâûøåíèÿ êâàëèôèêàöèè!
ïîäðîáíåå   >>>
 

Óâàæåìûå ñòóäåíòû ÀÍÎ ÂÏÎ ÈÌÝèÈ!
ïîäðîáíåå   >>>
 

Íà÷èíàåòñÿ íàáîð íà êóðñû ïîâûøåíèÿ êâàëèôèêàöèè!
ïîäðîáíåå   >>>
 

Ïðèãëàøàåì ïðèíÿòü ó÷àñòèå â êîíôåðåíöèÿõ!
ïîäðîáíåå   >>>
 


âñå íîâîñòè...

 


Ðàññûëêè Subscribe.Ru
Ñîâðåìåííîå îáðàçîâàíèå
Ïîäïèñàòüñÿ ïèñüìîì