По учебе мне понадобилось разрабатывать эмулятор планировщика процессов со всеми вытекающими. Правда без каких либо сложностей, но об этом в следующей статье ;). Писать планировщик мне придется на Delphi, выбирал язык не я, но ничего страшного. Сначала я решил писать в Lazarus’e, так как в моем ВУЗе комиссия взяла штраф и заставила снести windows шиндоус. Но как оказалось, можно принести ноутбук со своим шиндоусом и показать на нем работу программы. Поэтому я решил скачать себе старый добрый Delphi 7, и писать в нем. Но не тут то было! Внезапно я нашел Delphi Lite Full Edition и решил его попробовать. Кого заинтересовало, прошу под кат.
Разработчиком является Twenty Ten, вот его блог посвященный Delphi 7 Lite. Жаль что он на китайском(или каком? Могу ошибаться!), но внизу страницы можно все таки найти ссылки на скачивание. Кому это сделать не удалось, вот они(для версии 7.3.4.3):
- Delphi7 Lite Full Edition 7.3.4.3
- Delphi7 Lite Medium Edition 7.3.4.3
- Delphi7 Lite Min Edition 7.3.4.3
- Delphi7 Lite Tiny Edition 7.3.4.3
Как видно из ссылок есть 4 варианта: full, medium, min, tiny. Я решил скачать full, а при установке убрать лишнее. Размер full версии всего лишь 78 мегабайт. Скачал, распаковал:
Небольшой размер вызван тем, что часть необходимых файлов будет скомпилирована во время установки. Текстовые документы нам ничего не скажут, поэтому сразу же приступим к установке. Запускаю файл Delphi7_Lite_Full_Edition_Setup_7.3.4.3_Build_20110801.exe. Сразу же получаю предупреждение, что установщик расчитан на 32-х битную ОС, а у меня 64-х битная. Понадеемся, что все пройдет гладко. Жму окей, открывается первое окно установщика:
Жму далее, «читаю» лицензию, соглашаюсь. В третьем окне информация про сборку. Идем дальше. Следующий шаг — выбор директории. Оставляю стандартную. Жму далее. Теперь необходимо выбрать компоненты для установки:
Долго не думая, выбрал «Original Edition Likely installation». Жму далее. Ничего интересного дальше не было, поэтому еще пару раз нажал далее, дошел до установки — жму установить. Началась распаковка файлов. После нее началась компиляция, вот такое вот окно:
Через минут 10 установка закончилась. Ну что, запустим Delphi 7 Lite:
На боковых панельках редактора форм красуется куча плагинов. Редактор кода тоже подвергся изменениям. Я минималист, не люблю лишнего. Поэтому скорее всего потом переустановлю его(Delphi 7 Lite), но уже как Tiny Edition.
Явный плюс — совместимость с Windows 7. Приступим к написанию простого приложения. При перетаскивании объектов на форму, сразу же предлагается изменить имя компонента.
Очень удобная штука. Так как зачастую приходится после всех манипуляций с интерфейсом еще столько же времени потратить на понятные имена для кнопок, полей ввода, лейбов и так далее.
Теперь займемся программированием. Первое наше приложение будет загружать страницу введенного сайта в много строчное текстовое поле(memo). Добавим на форму кнопку(btnStart), текстовое поле(mmoMain) и текстовый бокс(edtUrl). Идея я думаю ясна: пользователь вводит в textbUrl ссылку, жмет кнопку btnStart, текст страницы загружается в memoMain. Ничего сложного. Приступим! Напишем простую функцию, добавляющую «http://» к URL, если пользователь его не написал. Получилось так:
function TformMain.CheckUrl(input: string): string; var temp: string; begin if (Pos('http://', input) = 0) then temp:= 'http://' + input else temp:= input; result:= temp; end;
Теперь можно реализовать функцию скачивания страницы. Использую старый добрый Indy.
procedure TformMain.DownloadPage(url: string; var result: string); var idClient: TIdHTTP; begin idClient:= TIdHTTP.Create(nil); idClient.Request.UserAgent:= 'Samsung Galaxy S Android 2.2 - Mozilla/5.0' + ' (Linux; U; Android 2.2; ru-ru; GT-I9000' + ' Build/FROYO) AppleWebKit/533.1 (KHTML,' + ' like Gecko) Version/4.0 Mobile Safari/533.1'; result:= idClient.Get(url); idClient.Free; end;
UserAgent установил просто так. У нас есть функция проверки url и процедура скачивания страницы, напишем теперь обработчик нажатия кнопки.
procedure TformMain.btnStartClick(Sender: TObject); var result: string; begin DownloadPage(CheckUrl(edtUrl.Text), result); mmoMain.Text:= result; end;
В итоге вышла вот такая софтина:
И так, в ходе работы я обнаружил следующие преимущества Delphi 7 Lite редакции Twenty Ten от обыкновенного Delphi 7:
- Хорошая и быстрая подсветка синтаксиса;
- Удобный плагин для редактирования свойств визуальных компонентов прямо над формой;
- Наличие подсветки begin и end, то есть операторных скобок. Помимо begin и end подсвечиваются соответствующие операторы условий и циклов;
- Более быстрая компиляция, на моей бюджетной машине реально заметен прирост даже на таком маленьком приложении;
- Подсветка номеров строк;
- Совместимость с Windows 7, то есть отсутствие каких либо ошибок и предупреждений о некорректной работе;
- Возможность установки как обыкновенной так и портативной версии.
Абсолютно не жалею, что потратил время на установку и написание статьи. Прямо аж захотелось вспомнить прошлое, и написать что нибудь :).
Пробуйте, пишите о проблемах/ошибках, задавайте свои ответы. Удачи!
С самого начала изучения пользуюсь данной средой разработки.. Удобно.. Доволен..
После мега крутого программирования в универе на Pascal и Excel, да, вы не ослышались, Excel, мне как-то противно даже смотреть на коды Pascal 😆 В Linux можно попробовать Kylix, но его прекратили поддерживать…
В Linux есть Lazarus. Очень «стабильная» штука.
Пользуюсь ей уже не помню с какой версии. Реально лучше и удобнее оригинальной делфи с 300 МБ инсталлятором.
Спасибо за обзор, можно я опубликую его на сайте одном? Конечно, с указанием авторства. А то писать самому лень такое же с нуля)
Публикуйте, только ссылку на мой блог оставьте. Спасибо за отзыв.
Автор, открой для себя CNPack
Именно он все фишки добавил в эту сборку 🙂
Спасибо. Может быть попробую. В данный момент не разрабатываю ничего на Delphi.
Я не смог установить Делфи. Пишется при запуске Делфи что не хватает многих файлов с расширением bpl.
Видимо у вас битый инсталлятор.
У меня установилась нормально, но отказывается копмпилировать программы с использованием драйверов для сом-порта-не видит их.Все вроде прописал как на Дельфи 7.Правда экзешник старый запускает.В чем дело не пойму.
Увы не могу вам помочь. Уже долгое время не использую Delphi. Вы пробовали искать похожую проблему в интернете?
Не отображаются комментарии
Какие именно?