Программирование в среде Delphi. Часть 2. Создание оконных приложений. Садовская О.Б. - 16 стр.

                                        16
                             f – ф орм а т (способ изоб ра ж ен ия );
                             l – об щее количест во циф р;
                             m – количест во циф р после д еся тичн ой точки.

Соот вет ст ву ю ща я ин ст ру кция б у д ет выгля д ет ь след у ю щим об ра зом :
Label2.Caption:=Edit1.Text + ' д ю йм (а /ов) э  т о ' + FloatToStrF(sm,
ffGeneral,6, 2) + ' см ';
З д есь зн а к ′ + ′ я вля ется зн а ком опера ции кон ка т ен а ции (склеива н ия
ст рок).
      Полн ый т екст процед у ры об ра б от ки соб ытия OnClick д ля кн оп-
ки Button1:
      procedure TForm1.Button1Click(Sender: TObject);
      var d, sm : real;
      begin
        d:=StrToFloat(Edit1.Text);
        sm:=d*2.54;
        Label2.Caption:=Edit1.Text + ' д ю йм (а /ов) э   то ' +
                          FloatToStrF(sm, ffGeneral, 6, 2) + ' см ';
      end;


                                     Сох р ане ни е пр оект а
      В т ерм ин ологии Delphi проект – э             т о н а б ор ф а йлов, использу я
кот орые ком пиля тор созд а ёт ф а йл исполн я ем ой програ м м ы. Од ин из
э т их ф а йлов, сод ерж а щий об щее описа н ие проект а , н а зыва ется ф а йлом
проект а и им еет ра сш ирен ие dpr. Проект та кж е вклю ча ет в себ я
од ин или б олее м од у лей, ф а йлы которых им ею т ра сш ирен ие pas и
сод ерж а т т екст ы процед у р, ф у н кций, описа н ие т ипов и д ру гу ю ин -
ф орм а цию , н еоб ход им у ю ком пиля т ору д ля созд а н ия исполн я ем ой про-
гра м м ы.
      Ч т об ы сохра н ит ь проект , н а д о из м ен ю File выб ра т ь ком а н д у
SaveProjectAs. Е сли проект ещё н и ра зу н е б ыл сохра н ён , то в от вет
Delphi сн а ча ла вывод ит д иа логовое окн о SaveUnit1As. В э               том окн е
след у ет выб ра т ь па пку , пред н а зн а чен н у ю д ля хра н ен ия всех проект ов
Delphi. В э     той па пке след у ет созд а т ь н ову ю от д ельн у ю па пку д ля
ф а йлов д а н н ого сохра н я ем ого проект а . Д ля э   т ого использова т ь кн опку
“ Созд а н ие н овой па пки”. Ря д ом с поя вивш им ся зн а чком н овой па пки
в ра м ке н а печа т а ть им я па пки проект а – Д ю йм и н а ж а т ь Enter. З а -
т ем от крыть э    т у созд а н н у ю па пку и в поле И м я ф а йла либ о ввести
им я , н а прим ер, inch_, либ о согла сит ься с пред лож ен н ым им ен ем
( Unit1 ), и щелкн у т ь н а кн опке Сохра н ит ь. После э             того поя вля ет ся
след у ю щее д иа логовое окн о SaveProject1As, гд е в ка чест ве т ипа ф а й-
ла у ка за н о Delphi project (∗ . dpr). В поле И м я ф а йла введ ём н а зва н ие
ф а йла проект а inch (б ез зн а ка под чёркива н ия ) или м ож н о согла сит ься
с пред лож ен н ым им ен ем ( Project1 ).