Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.09.10;
Скачать: CL | DM;

Вниз

Модули   Найти похожие ветки 

 
abba   (2006-08-23 00:27) [0]

Здравствуйте. Подскажите, пожалуйста, где и какую информацию надо изучить, чтобы написать свой собственный модуль и вставить в другую рабочую программу. Спасибо.


 
Anatoly Podgoretsky ©   (2006-08-23 00:33) [1]

Свой модуль начинается с ключевого слова unit
Можешь создать свою форму и сохранить и модуль готов. Писать в этом случае ничего не надо


 
abba   (2006-08-23 00:42) [2]

Спасибо


 
DevilDevil ©   (2006-08-23 00:42) [3]

сохрани следующий текст в файл например "MyUnit.pas" в ту директорию, в которой расположен твой проект:

unit MyUnit;

interface
     uses windows, SysUtils, Dialogs;

// здесь описываются "экспортируемые" функции и процедур
procedure ShowError(ErrorString : string);

implementation

// здесь расположена реализация функций и процедур
procedure ShowError(ErrorString : string);
begin
 MessageDlg(ErrorString,  MtError, [mbOk], 0);
end;

end.


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

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

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


 
Palladin ©   (2006-08-23 00:48) [4]

Где? - Хотя бы в книжках посвященных 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"ы :)


 
Ketmar ©   (2006-08-23 00:52) [5]

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


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


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

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


 
Ketmar ©   (2006-08-23 01:31) [7]

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


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


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

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


 
Ketmar ©   (2006-08-23 11:11) [9]

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



Страницы: 1 вся ветка

Текущий архив: 2006.09.10;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.05 c
2-1156263776
GunGarry
2006-08-22 20:22
2006.09.10
Заблокировать файл папку


2-1155916392
kami
2006-08-18 19:53
2006.09.10
Коннект 2-х TServerSocket


15-1155037865
Lexiy
2006-08-08 15:51
2006.09.10
Прием на работу


15-1155989075
Мичман Панин
2006-08-19 16:04
2006.09.10
Вопрос для знатоков: чем критерии выбора одежды отличаются от


3-1152081560
Konrads
2006-07-05 10:39
2006.09.10
Ошибка при попытке открыть базу Access





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский