Основні поняття та принципи системи Delphi – Лекція. Мова програмування Delphi (Делфі) Що таке делфі 7

З Delphi зазвичай асоціюється середовище розробки додатків з урахуванням мови Object Pascal, розробленого фірмою Borland. Ця мова є спадкоємцем Turbo Pascal з об'єктно-орієнтованими розширеннями, яка у свою чергу веде свою історію від «чистого» Pascal, створеного Ніклаусом Віртом у 1970 році.

Згодом, 2002 року, розробники з компанії Borland офіційно поставили знак рівності між мовами Delphi та Object Pascal.

Передісторія

Однак його IDE, якщо це поняття можна застосувати до тогочасного середовища розробки, функціонувала тільки на базі операційної системи DOS.

З появою Windowsвиникла необхідність у створенні середовища розробки програмного забезпечення для цієї платформи. Найбільш популярним рішенням для персональних Windows-комп'ютерів у 80-ті - на початку 90 років став компілятор і IDE Turbo Pascal фірми Borland. Вбудований компілятор забезпечував високу швидкістькомпіляції та висока якістькоду (звідси приставка Turbo). Середовище Turbo Pascal забезпечувало також налагодження коду, містило багатий набір прикладів. Всі ці якості дозволили Turbo Pascal стати стандартом мови Pascal.

Виклик часу

Щоб створити просту програму, розробникам доводилося писати кілька сторінок коду: прописувати об'ємні блоки коду для меню і вікон, шрифтів, очищати пам'ять, «малювати» кнопки тощо. Однак переваги графічного інтерфейсу Windows були досить сильними, тому потрібно було підтримати розвиток операційної системи. У Microsoft розуміли, що потрібно якось полегшити життя розробників. Тому в 90-х роках компанія запустила кілька паралельних проектів щодо створення нової мови програмування та середовища розробки для Windows. Першою ластівкою став Visual Basic.

Перспективи мови Pascal у цьому відношенні виявилися далеко не райдужними. До середини 90-х років він перебував у досить занедбаному стані. Компанія Borland почала доопрацьовувати його, але незабаром стало зрозуміло: зміни та додавання будуть настільки серйозними, що результат роботи можна вважати новою мовою програмування. Для нової мови було розроблено IDE з графічним інтерфейсом. Нове середовище програмування та мова отримали загальну назву Delphi.

Своє ім'я нова система(Delphi) отримала на честь давньогрецького міста Дельфи. Назва була обрана недарма: місто Дельфи пов'язане з ім'ям бога мудрості та покровителем мистецтв Аполлона. Згідно з легендою, головне святилище Аполлона знаходилося саме в цьому місті. Його жриці-сівіли пророкували пророцтва охочим дізнатися про свою долю.

У Росії її Borland Delphi з'явився наприкінці 1993 року і відразу ж завоював велику популярність.

Основні версії

Версія 1 призначена для розробки під 16-розрядну платформу Win16. Починаючи з другої версії, було реалізовано можливість компіляції програми під 32-розрядну платформу Win32.

Delphi 1

У версії 3 з'явилася підтримка багатоланкової технології (multi-tiered) доступу до даних, що дозволило створювати масштабовані додатки (щодо слабо залежать від сервера БД) за рахунок перенесення методів обробки інформації (бізнес-правил) на середню ланку.

Delphi 3

Разом з 6-ю версією Delphi вийшло сумісне з ним з мови та бібліотек середовище Kylix, призначене для компіляції програм під операційну систему Linux.

Версія 8 здатна генерувати байт-код виключно для платформи. Це перше середовище, орієнтоване розробку мультимовних додатків (лише платформи.NET). Наступні версії (позначаються роками виходу, а не порядковими номерами, як це було раніше) дозволили створювати як програми Win32, так і .NET-програми.

У Delphi 2006, з'явилася можливість писати програми для .NET використовуючи стандартну бібліотекукласів.NET, VCL для. Середовище також дозволило писати.NET-програми на C# і Win32-програми на C++. У Delphi 2006 була реалізована технологія MDA (Model Driven Architecture) за допомогою ECO (Enterprise Core Objects) версії 3.0.

За що боролися

Розробник отримав у розпорядження потужні засоби налагодження (аж до покрокового виконання команд процесора), зручну контекстну довідкову систему (зокрема і Microsoft API), засоби колективної роботи над проектом.

Стало можливим створювати компоненти ActiveX без використання Microsoft IDL, що розширює можливості web-сервера (скрипти на стороні сервера), практично нічого не знаючи про HTML, XML або ASP.

З'явилася можливість створювати розподілені програми на базі СОМ та CORBA, Інтернет- та intranet-додатки, використовуючи для доступу до даних Borland DataBase Engine, ODBC-драйвери або Microsoft ADO.

У Delphi розробникам дали можливість створювати власні компоненти, імпортувати ОСХ-компоненти, створювати шаблони проектів і майстрів, що генерують заготівлі проектів. Більш того, автори надали розробнику інтерфейс для зв'язку інших програм (або зовнішніх програм) з Delphi IDE.

Зміни

У березні 2006 року компанія Borland ухвалила рішення про припинення подальшого розвитку інтегрованих середовищ розробки JBuilder, Delphi та C++Builder через збитковість цього напрямку. Був запланований продаж IDE-сектору компанії. Група прихильників вільного програмного забезпеченняорганізувала збір коштів на купівлю у Borland прав на середовище розробки та компілятор. Однак у листопаді того ж року було ухвалено рішення відмовитися від продажу IDE бізнесу.

Після цього розробкою IDE-продуктів стала займатися нова компанія CodeGear, яка була фінансово повністю підконтрольна Borland.

У березні 2007 року CodeGear порадувала користувачів оновленої лінійкою продуктів Delphi 2007 for Win32 і виходом нового продукту Delphi 2007 for PHP.

25 серпня 2008 року компанія Embarcadero, новий господар CodeGear, опублікувала прес-реліз на Delphi for Win32 2009. У цій версії з'явилося багато нововведень на рівні мови:

За замовчуванням повна підтримка Юнікоду у всіх частинах мови, VCL та RTL;
Заміна звернень до всіх функцій Windows API на юнікодні аналоги (тобто MessageBox викликає MessageBoxW, а не MessageBoxA).
Узагальнені типи, вони ж є generics.
Анонімні методи.
Нова директива компілятора $POINTERMATH.
Функція Exit тепер може приймати установки відповідно до типу функції.

У версії Delphi XE2 (2011 рік) було додано компілятор Win64 та крос-компіляція для операційних систем фірми Apple (MacOS X, iOS).

Про наступну версію у своєму інтерв'ю розповідав Всеволод Леонов, російський євангеліст Delphi із компанії Embarcadero Technologies:

Продукт Delphi XE3 є продовженням нової генерації засобів швидкої розробки сімейства Delphi. Нагадаю, у 2011 році вийшла Delphi XE2 із платформою FireMonkey, яка є альтернативою бібліотеки візуальних компонентів VCL.

Вона дуже схожа на VCL за методами використання та складом компонентів (кнопки, мітки, поля введення, меню тощо), але має здатність бути перенесеною на іншу операційну систему. FireMonkey – кросплатформова. Програми, створені за допомогою FireMonkey, можуть компілюватись і під Windows, і під Mac OS. Майже в один-два «кліки» ми можемо перезбирати проект під іншу операційну систему. Майже всі демонстраційні проекти, що поставляються з Delphi на платформі FireMonkey, мають дві версії: одну під Windows, іншу - під Mac OS. І для цього не потрібно вносити зміни до вихідного коду програми

У квітні 2016 року з'явилася Delphi 10.1 Berlin. Нововведення:

• Компілятор та набір інструментів Object Pascal для 64-розрядної iOS;
• Підтримка універсальних додатків iOS(включення 32- та 64-розрядних двійкових файлів у пакет програми);
• Передпроглядання FireUI на мобільних платформах;
• Передпроглядання на різних пристроях;
• Розширені можливості роботи зі стилями у дизайнері єдиного інтерфейсу, у тому числі універсальні стилі та налаштування стилів Windows;
• Диспетчер пристроїв FireUI дозволяє змінювати специфікації доступних пристроїв та додавати нові пристрої;
• Елементи управління Memo, ListView, Calendar, Switch для платформи iOS;
• Компонент MapView для мобільних платформ (iOS та Android), що підтримує спеціалізовані бібліотеки інтерактивних карток для кожної платформи (розроблені відповідно Apple та Google).

Ні живий, ні мертвий

Але можна згадати, що така думка найчастіше зустрічається в США та Західній Європі, де ця мова шаленої популярності і не мала ніколи. Там ці міркування можуть бути цілком резонними у багатьох випадках. Але й інші країни, де може відрізнятися - країни СНД та інші країни Східної Європи.

Із цим згоден Всеволод Леонов:

Невеликий історичний екскурс із приводу країн Східної Європи. Система освіти колишнього СРСР була дуже сильна в багатьох аспектах, але не в прикладному програмуванні. На початку 90-х як отримати доступ до комп'ютера, так і навчитися щось робити в сучасних середовищах розробки могли лише ті, хто мав певну спеціальність.

Цілі факультети «пролітали повз» фундаментальні курси з програмування. І наявність Turbo Pascal з низьким порогом входження, а потім середовища Delphi, що дозволяє зайнятися самоосвітою у хорошому сенсі цього слова, змогли наситити ІТ-галузь досить грамотними розробниками, а також підвищити загальнонаціональний інженерний рівень створення прикладного ПЗ.

Таким чином, для країн колишнього соцтабору зв'язки Pascal/Delphi різко висмикнули економіку з ІТ-небуття за рахунок дуже простої мови програмування та середовища візуальної розробки на основі готових компонентів.

Новий герой із open source

На основі FreePascal створена вільна мультиплатформенна IDE Lazarus, що дозволяє працювати з проектами Delphi. Вона заснована на бібліотеці візуальних компонентів Lazarus Component Library (LCL).

Список заявлених підтримуваних платформ:

Windows: 98, 2k, XP, Vista, 7, 32 та 64bit;
FreeBSD/Linux: gtk 2.8 та qt4.5, 32 та 64bit;
Mac OS X: 10.4, LCL тільки 32bit, не LCL може бути 64bit.

З іншого боку, середа Delphi у міру розвитку справді ставала все більш громіздкою і малопридатною для навчання програмування. Крім того, відсутня безкоштовна версія Delphi навіть для академічного використання. Ці фактори призвели до практично повного зникнення Delphi зі сфери освіти.

Переді мною ніколи не стояло завдання визначення розміру файлу Delphi. Але після того, як десь побачив питання: " як визначити розмір файлу", Мені теж стало цікаво.

Визначення розміру файлу це те саме, що визначення зростання удава у відомому мультику! Скільки байтів у нього поміститься, такий його розмір. План такий:

1. Задаємо тип даних розміром 1 байт. Це буде запис.
2. Визначаємо файлову змінну цього типу.
3. Починаємо з початку файлу та переходимо до кінця. Скільки переходів – стільки і байтів у файлі!

procedure
type TSize = Record
Bait: byte;
end;
var F: File of TSize;
Size: Integer;
begin
Size:=0;
with OpenDialog1 do
if Execute then
begin
AssignFile(F, FileName);
Reset(F);
while (not EOF(F)) do
begin
Size:=Size+1;
seek(F, Size);
end;
CloseFile(F);
end;
end;

Програма була написана за п'ять хвилин, що називається, "на коліні". Вона працює, і для файлів розміром до кількох мегабайт час очікування результату невеликий, кілька секунд. Для великих файлів очікування затягується, і програма виглядає "завислою". Можна змінити програму так, щоб вона вважала кілобайти (замінити seek(F, Size) на seek(F, Size*1024)). Швидкість роботи зросте в 1024 рази і вже буде прийнятною.

Це була ще одна демонстрація прийомів роботи з файлами. А насправді все набагато простіше! Розмір файлу повертається вбудованою функцією FileSize. А файл досить описати як такий, що має тип byte:

procedure TForm1.ButtonClick(Sender: TObject);
var F: File of byte;
Size: Integer;
begin
with OpenDialog1 do
if Execute then
begin
AssignFile(F, FileName);
Reset(F);
Size:=Filesize(F);
Form1.Caption:=IntToStr(Size); // Виводимо інформацію про розмір у заголовок Форми
CloseFile(F);
end;
end;

Є альтернативний спосіброботи з файлами Delphi, В якому файл розглядається як об'єкт. Там також є інтегровані методи визначення розміру файлу. Також наведу процедуру повністю:

procedure TForm1.ButtonClick(Sender: TObject);
var F: TFileStream;
begin
with OpenDialog1 do
if Execute then
begin
F:=TFileStream.Create(Filename, fmOpenRead);
Caption:=IntToStr(F.Size);
F. Free;
end;
end;

Ця процедура виглядає компактніше, працює швидше, але вимагає додаткової підготовки.

Delphi – що це?

Останнім часом різко зріс інтерес до програмування. Це пов'язано з розвитком та впровадженням у повсякденне життя інформаційно-комунікаційних технологій. Якщо людина має справу з комп'ютером, то рано чи пізно у неї виникає бажання, а іноді й потреба програмувати.

Серед користувачів персональних комп'ютерівВ даний час найбільш популярне сімейство операційних систем Windows і, природно, що той, хто збирається програмувати, прагне писати програми, які працюватимуть у цих системах.

Кілька років тому пересічному програмісту залишалося тільки мріяти про створення власних програм, що працюють у середовищі Windows, тому що єдиним засобом розробки був Borland C++ for Windows, явно орієнтований на професіоналів, які мають серйозні знання та досвід.

Бурхливий розвиток обчислювальної техніки, потреба в ефективних засобахРозробки програмного забезпечення призвели до появи систем програмування, орієнтованих на так звану "швидку розробку", серед яких можна виділити Borland Delphiі Microsoft Visual Basic. В основі систем швидкої розробки (RAD-систем, Rapid Application Development- середовище швидкої розробки додатків) лежить технологія візуального проектуванняі подійного програмування, суть якої у тому, що середа розробки перебирає більшу частину рутинної роботи, залишаючи програмісту роботу з конструювання діалогових віконта функцій обробки подій. Продуктивність програміста під час використання RAD-систем - фантастична!

Delphi- Це середовище швидкої розробки, в якій як мову програмування використовується мова Delphi. Мова Delphi - строго типізована об'єктно-орієнтована мова, в основі якої лежить добре знайома програмістам Object Pascal.

В даний час програмістам стала доступна чергова версія пакету Delphi. Borland Delphi 7 Studio. Як і попередні версії, Borland Delphi 7 Studio дозволяє створювати різні програми: від найпростіших одновіконних додатків до програм управління розподіленими базами. До складу пакету включені різноманітні утиліти, що забезпечують роботу з базами даних, XML-документами, створення довідкової системи, вирішення інших завдань. Відмінною особливістюсьомий версії є підтримка технології.

Borland Delphi 7 Studioможе працювати серед операційних систем від Windows 98 до Windows XP. Особливих вимог, за сучасними мірками, до ресурсів комп'ютера пакет не пред'являє: процесор має бути типу Pentium або Celeron з тактовою частотоюне нижче 166 МГц (рекомендується Pentium II 400 МГц), оперативної пам'яті- 128 Мбайт (рекомендується 256 Мбайт), достатньо вільного дискового простору (для повної установкиверсії Enterprise потрібно приблизно 475 Мбайт).

Про цю книгу

У книзі, яка присвячена програмуванню в конкретному середовищі розробки, потрібен баланс між трьома лініями – мовою програмування, технікою та технологією програмування (програмуванням як таким) та середовищем розробки. Вже при першому знайомстві з середовищем розробки, представленні її можливостей у автора виникає проблема: щоб описати процес розробки програми, пояснити, як працює програма, потрібно оперувати такими термінами, як об'єкт, подія, властивість, розуміння яких на початковому етапі вивчення програмування дуже проблематичне. Як вчинити? Спочатку дати опис мови, а потім приступити до опису середовища розробки та процесу програмування в Delphi? Очевидно, що це не кращий варіант. Тому при викладі матеріалу прийнято підхід, в основу якого покладено принцип дотримання балансу між мовою програмування, методами програмування та середовищем розробки. На початку книги деякі поняття, без яких просто неможливо викладення матеріалу, даються на рівні визначень.

Книга, яку ви тримаєте в руках - це не опис мови Delphi або середовища розробки Delphi 7 Studio. Це навчальний посібник з програмування на мовою Delphiв однойменному середовищі. У ньому розглянуто весь ланцюжок, весь процес створення програми: від розробки діалогового вікна та функцій обробки подій до створення довідкової системи та настановного диска.

Мета цієї книги може бути сформульована так: навчити програмувати серед Delphi, т. е. створювати закінчені програми різного призначення: від простих одновіконних додатків до цілком професійних програм роботи з базами даних.

Навчитися програмувати можна лише програмуючи, вирішуючи конкретні завдання. У цьому досягнуті у програмуванні успіхи значною мірою залежить від досвіду. Тому, щоб отримати максимальну користь від книги, ви повинні працювати з нею активно. Чи не займайтеся просто читанням прикладів, реалізуйте їх за допомогою вашого комп'ютера. Не бійтеся експериментувати – вносите зміни до програм. Чим більше ви зробите самостійно, тим більше ви навчитеся!

Delphi(Делфі, вимовляється /ˈdɛlˌfi:/) - імперативна, структурована, об'єктно-орієнтована мова програмування, діалект Object Pascal. Починаючи з середовища розробки Delphi 7.0, в офіційних документах Borland стала використовувати назву Delphi для позначення мови Object Pascal. Починаючи з 2007 року вже мова Delphi (похідна від Object Pascal) почала жити своїм самостійним життям і зазнавала різних змін, пов'язаних із сучасними тенденціями (наприклад, з розвитком платформи.NET) розвитку мов програмування: з'явилися class helpers, перевантаження операторів та інше.

Цільова платформа

Спочатку середовище розробки було призначено виключно для розробки додатків Microsoft Windows, потім був реалізований також для платформ Linux (як Kylix), проте після випуску в 2002 році Kylix 3 його розробка була припинена, і незабаром після цього було оголошено про підтримку Microsoft .NET .

Реалізація середовища розробки проектом Lazarus (Free Pascal, компіляція в режимі сумісності з Delphi) дозволяє використовувати його для створення програм на Delphi для таких платформ, як Linux, Mac OS X і Windows CE.

Також робилися спроби використання мови у проектах GNU (наприклад, Notepad GNU) та написання компілятора для GCC.

Історія мови

Object Pascal - результат розвитку мови Турбо Паскаль, який, у свою чергу, розвинувся з мови Паскаль. Паскаль був повністю процедурною мовою, Турбо Паскаль, починаючи з версії 5.5, додав у Паскаль об'єктно-орієнтовані властивості, а в Object Pascal - динамічну ідентифікацію типу даних з можливістю доступу до метаданих класів (тобто до опису класів та їх членів) у коді, що компілюється. , також званому інтроспекцією - дана технологіяотримала позначення RTTI. Оскільки всі класи успадковують функції базового класу TObject, будь-який покажчик на об'єкт можна перетворити до нього, після чого скористатися методом ClassType та функцією TypeInfo, які й забезпечать інтроспекцію.

Також характерною властивістю Object Pascal від С++ є те, що стандартні об'єкти розташовуються в динамічній пам'яті. Однак можна перевизначити віртуальні методи NewInstance та FreeInstance класу TObject. Таким чином, абсолютно будь-який клас може здійснити «бажання» «де хочу – там і лежатиму». Відповідно організується і «багатокучність».

Object Pascal (Delphi) є результатом функціонального розширення Turbo Pascal.

Delphi вплинув створення концепції мови для платформи .NET . Багато його елементів та концептуальні рішення увійшли до складу С#. Однією з причин називають перехід Андерса Хейлсберга, одного з провідних розробників Дельфі, з компанії Borland Ltd. у Microsoft Corp.

• Версія 8 здатна генерувати байт-код виключно для платформи. Це перше середовище, орієнтоване розробку мультимовних додатків (лише платформи.NET);
• Наступні версії (позначаються роками виходу, а не порядковими номерами, як це було раніше) можуть створювати програми W32, так і байт-код для платформи.NET.

Однак у листопаді того ж року було ухвалено рішення відмовитися від продажу IDE бізнесу. Тим не менш, розробкою IDE продуктів тепер займатиметься нова компанія – CodeGear, яка буде фінансово повністю підконтрольна Borland.

Торішнього серпня 2006 року Borland випустив полегшену версію RAD Studio під назвою Turbo: Turbo Delphi (для Win32 и.NET), Turbo C#, Turbo C++.

У березні 2008 року оголошено про припинення розвитку цієї лінійки продуктів.

У березні 2007 року CodeGear порадувала користувачів оновленої лінійкою продуктів Delphi 2007 for Win32 і виходом нового продукту Delphi 2007 for PHP.

У червні 2007 року CodeGear представила свої плани на майбутнє, тобто опублікувала так званий roadmap.

Embarcadero RAD Studio 2010

• За замовчуванням повна підтримка Юнікоду у всіх частинах мови, VCL та RTL; заміна звернень до всіх функцій Windows API на юнікодні аналоги (тобто MessageBox викликає MessageBoxW, а не MessageBoxA).
• Узагальнені типи, вони ж generics.
• Нова директива компілятора $POINTERMATH.
• Функція Exit тепер може приймати установки відповідно до типу функції.

Компілятори

• Embarcadero Delphi (раніше зв. CodeGear Delphi і Borland Delphi) - напевно, найвідоміший компілятор, який є послідовником Borland Pascal та Turbo Pascal. Використовується Win16 (Delphi 1), Win32 (Delphi 2 та пізніше), Win64 (Delphi 16 (XE2) та пізніше), а також .NET 1.x, 2.0 (Delphi 8, Delphi 2005-Delphi 2007). Підтримка .NET згодом виділена в окремий продукт, відомий як Oxygene.
• Free Pascal (FPC) - вільний компілятор Оbject Pascal, який підтримує різні діалекти Паскаля, включаючи Turbo Pascal, Delphi та власні діалекти. На даний момент, FPC може генерувати код для x86, x86-64, PowerPC, SPARC і процесорів ARM, а також для різних операційних систем, у тому числі для Microsoft Windows, Linux, FreeBSD, Mac OS. Існує кілька середовищ розробки програмного забезпечення для FPC (одне з найвідоміших представників - Lazarus).
• GNU Pascal (окремо розроблена версія з GCC). Не ставить за мету продовження серії діалектів Delphi, як складової Паскаля, проте містить режим сумісності Borland Pascal, і дуже повільно пристосовує компоненти мови Delphi. Не підходить для компіляції великих проектів, що містять код Delphi, але варто відзначити, що його підтримують більшість операційних систем та архітектур.
• Oxygene (раніше відомий як Chrome) - компілятор Object Pascal, який інтегрований у Microsoft Visual Studio. Також доступний у вигляді компілятора із вільною командним рядком CLI. Використовує .NET та моно платформи. В теперішній моментпродається під маркою Embarcadero Delphi Prism.
• MIDletPascal - мова програмування з Delphi-подібним синтаксисом, і однойменний компілятор, який перетворює вихідний код на компактний та швидкий байт-код Java.
• PocketStudio - заснована на Паскалі, IDE для Palm OS.
• Virtual Pascal - Безкоштовний компілятор та текстова IDE для Win32, OS/2 та Лінукса. На той момент дуже швидкий і сумісний (частково підтримуються конструкції Delphi 5). Зовні дуже схожий на текстове середовище Borland Pascal 7, хоча відсутня сумісна з ним графіка, наприклад. Проте технологія закінчилася в 2004 році, а вихідники відкриті не були. З тих пір FPC пішов набагато вперед і в цілому для програмування краще він. Тим не менш, VP залишається дуже непоганим варіантом швидкої замінище більш застарілих версій Borland Pascal для школи/інституту з огляду на рідну роботу у Win32 без проблем з російськими кодуваннями.

Синтаксис мови

Оператори

Список операторів через пробіл: := + - * / div mod not and or with xor shl shr^=<> >= <= < >@ in is as

Вирази

Вирази в Object Pascal (Delphi) бувають арифметичними, логічними та рядковими.

Основні логічні вирази:
Логічні висловлювання переважно використовуються в умовних операторів. До логічних виразів відносяться такі операції як:

• not - «НЕ», заперечення логічного вираження (NOT<логическое_выражение>)
• and - «І», множення (перетин) логічних виразів (<логическое_выражение1>AND<логическое_выражение2>)
• or - «АБО», об'єднання логічних виразів (<логическое_выражение1>OR<логическое_выражение2>)
• xor - «Виключає АБО», заперечення АБО, все що не потрапляє під АБО (<логическое_выражение1>XOR<логическое_выражение2>)

Типи даних

Оброблювані у програмі дані поділяються на змінні, константи та літерали. Константи є дані, значення яких встановлені в розділі оголошення констант і не змінюються в процесі виконання програми.

Об'єкти

• Продукція Embarcadero: Embarcadero Delphi, Embarcadero C++ Builder, Borland JBuilder 1 та 2 версії.
• Адміністрація та розробка баз даних: MySQL Tools, IBExpert.
• Інженерне програмне забезпечення: Altium Designer.
• Файлові менеджери: Total Commander, Frigate.
• Переглядачі графіки: FastStone Image Viewer, FuturixImager, drComRead.
• Відео- та аудіопрогравачі: Light Alloy, The KMPlayer, AIMP, X-Amp.
• Програми миттєвого обміну повідомленнями: QIP, R&Q, графічний інтерфейс Skype, The Bat! , PopTray , FeedDemon .
• Створення музики: FL Studio, Guitar Pro (до версії 6.0).
• Розробка програмного забезпечення: Dev-C++, DUnit, Game Maker, Inno Setup, PyScripter.
• Веб-розробка: Macromedia HomeSite.
• Текстові редактори: BirEdit , Notepad GNU , Bred .
• Бухоблік та оподаткування: «ПАРУС», AVARDA (до версії 6.x включно).
• Програми для створення анімацій: Pivot Stickfigure Animator.
• Програми для стиснення даних: ALZip, PowerArchiver, PeaZip.
• Комп'ютерні ігри: Age of wonders, «Космічні рейнджери», Venom. Codename: Outbreak, Space Empires V, «Правда про дев'яту роту».
• Графічні редактори: Real Paint.

Примітки

Література

• Ніл Дж. Рубенкінг.Мова програмування Delphi для "чайників". Вступ до Borland Delphi 2006 = Delphi for Dummies. – М.: Діалектика, 2007. – 336 с. - ISBN 0-7645-0179-8
• Хав'єр Пашеку.Програмування Borland Delphi 2006 для професіоналів = Delphi for .NET Developer's Guide. – М.: Вільямс, 2006. – 944 с. - ISBN 0-672-32443-X
• А. Н. Вальвачов, К. А. Сурков, Д. А. Сурков, Ю. М. Чотири.Програмування мовою Delphi. Навчальний посібник . – 2005.

Посилання

• Сторінка середовища програмування на сайті Embarcadero Technologies

Отже, в даній статті йтиметься про те, як визначити розрядність операційної системи Windowsпри програмуванні мовою Delphi. Це потрібно для того, щоб вибрати ту чи іншу версію драйвера - x86 (32 розрядна) або x64 (64 розрядна).

І так, приступимо.

Створюємо новий проект, кидаємо на форму компонент Label (текстовий напис).

Потім переходимо в редактор вихідного коду і розділ з змінними var додаємо рядкову змінну razr (тип даних string, тобто рядок).

var Form1: TForm1;

razr: string;

Після цього двічі натискаємо на форму, копіюємо та вставляємо в неї наступний код (у процедурі створення головної форми TForm1.FormCreate), між фразами begin та end; (тобто початком та кінцем процедури).

(за допомогою функції Get Enviroment Variable зчитуємо знання змінної ProgramFiles (X86)

якщо система 32 розрядна, вона матиме порожнє значення

якщо 64 розрядна, вона матиме знання C:Program Files(x86)

тобто папка, в яку встановлюються 32 розрядні версії програм)

razr:= GetEnvironmentVariable("ProgramFiles(x86)");

label1.Caption:= razr;

if (razr = "") then

begin

label1.Font.Color:=clRed; ( Змінює колір напису, ви можете вибрати будь-який на ваш смак, наприклад, clGreen - зелений)

label1.Caption:= "У вас x86"; (замість імені labl1 ви можете написати будь-яке інше, наприклад metka)

else

begin

label1.Font.Color:=clBlue; ( Змінює колір напису, ви можете вибрати будь-який на ваш смак, наприклад, clGreen - зелений)

label1.Caption:= "У вас x64";

end;

Як працює програма?

За допомогою функції Get Enviroment Variable відбувається зчитування значення змінної оточення у Windows ProgramFiles(X86).

Якщо система 32 розрядна, вона матиме порожнє значення.

Якщо 64-розрядна, то вона матиме знання C:Program Files(x86) тобто це папка, в яку встановлюються 32-розрядні версії програм.

Власне, на цьому все.

Ось що вийшло у мене.

Нижче ви можете завантажити архів з вихідним кодом програми, щоб спробувати самостійно розібратися в її роботі.

Коментарі ()

wdfm 90

На Windows 7 x64 програма працює чудово, можна користуватися

Всі хто буде розводити офф топік + нецензурну лайку, я даватиму бан на 1 день! Це не стосується адміністраторів.
.php?board=18.0

Форум не просто так я робив!