Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Модули

abba © (2006-08-23 00:27:00)
Здравствуйте. Подскажите, пожалуйста, где и какую информацию надо изучить, чтобы написать свой собственный модуль и вставить в другую рабочую программу. Спасибо.

Ketmar (2006-08-23 11:11:00) [1]
> [8] Германн © (23.08.06 03:16)
а. просто не въехал сразу -- редко вчитываюсь в незнакомые, да ещё и нерегистрированые ники. теперь понял. %-)

Германн (2006-08-23 03:16:00) [2]

> Ketmar © (23.08.06 01:31) [7]
>
> > [6] Германн © (23.08.06 01:08)
> ???
>

Нет слов! Ты что, не слышал про группу ABBA?

Ketmar (2006-08-23 01:31:00) [3]
> [6] Германн © (23.08.06 01:08)
???

Германн (2006-08-23 01:08:00) [4]

> Ketmar © (23.08.06 00:52) [5]

Мне лично больше всего интересно - кто из четверых настолько овладел русским языком и увлекся Дельфёй? :-)

Ketmar (2006-08-23 00:52:00) [5]
> [4] Palladin © (23.08.06 00:48)
телепатор подсказывает, что не плуги. есть подозрение на расширение функционала чужих программ посредством добавления в АП своего кода. %-)

Palladin (2006-08-23 00:48:00) [6]
Где? - Хотя бы в книжках посвященных Turbo/Borland Pascal 6.0/7.0
По сравнению с ними в Delphi добавлены ключевые слова initialization, finalization...

Какую? - См. содержание книги фильтруя его с использованием аналитических функций пероснального серого вещества.

Простой пример.

Unit MyUnit;

Interface

Procedure MyProc(Const s:String);
Function MyFunc(n:Integer):String;

Implementation
Uses
SysUtils,
Dialogs;

Procedure MyProc(Const s:String);
Begin
ShowMessage('MyProc "'+s+'"');
End;

Function MyFunc(n:Integer):String;
Begin
Result:='n='+IntToStr(n);
End;

End.

Это минимум, что касается модулей в контексте делфи.

Осталось понять, что же именно имел в виду ты под этим термином... надеюсь не plugin'ы :)

abba (2006-08-23 00:42:00) [7]
Спасибо

DevilDevil (2006-08-23 00:42:00) [8]
сохрани следующий текст в файл например "MyUnit.pas" в ту директорию, в которой расположен твой проект:

unitMyUnit;

interface useswindows, SysUtils, Dialogs; // здесь описываются "экспортируемые" функции и процедур procedure ShowError(ErrorString : string); implementation // здесь расположена реализация функций и процедур procedureShowError(ErrorString : string); begin MessageDlg(ErrorString, MtError, [mbOk], 0); end; end.

В тексте своей программы добавь свой модуль в uses, дописав через запятую MyUnit. Ну и допустим по нажатию кнопки впиши:
ShowError('Это Моё Первое Программное Ругательство !!!');

А ещё надо читать книжки, в которых описана структура модуля

P.S.Будь готов к тому, что тебя здесь осмеют

Anatoly Podgoretsky (2006-08-23 00:33:00) [9]
Свой модуль начинается с ключевого слова unit
Можешь создать свою форму и сохранить и модуль готов. Писать в этом случае ничего не надо

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »