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

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

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

детская проблема с компилированием DLL [D6, WinXP]

B-boy Dimo-N © (2004-09-21 19:29:00)
Дело вот в чём: есть у меня dll.
library auxiliary;
uses SysUtils, Classes;

{$R *.res}

Function ScanPartitionStr(InStr:string):string;
Var OutStr:string; N:integer;
Begin
OutStr:='';
For N:=1 To Length(InStr) Do
begin
if InStr[N]='|' then OutStr:=OutStr+#13
else OutStr:=OutStr+InStr[N];
end;
ScanPartitionStr:=OutStr;
End;

Function CorrectPath(InStr:string):string;
Var count : integer;
OutStr : string;
Begin
OutStr:='';
count := Length(InStr);
if InStr[count] <> '\' then OutStr := InStr + '\'
else OutStr := InStr;
CorrectPath := OutStr;
End;

Function GetDateCreateRpt():string;
Const Months: array [1..12] of Pchar =('??????','???????','?????','??????','???','????','????','???????','????????','???????','??????','???????');
Var Year, Month, Day :Word;
OutStr:string;
Begin
DecodeDate(Now,Year, Month, Day); {?????? ????,?????,??? ?? ?????? ??????}
OutStr:='?? ????????? ?? "'+IntToStr(Day)+'" '+Months[Month]+' '+IntToStr(Year)+' ?.';
GetDateCreateRpt:=OutStr;
End;

Exports ScanPartitionStr, CorrectPath, GetDateCreateRpt;

begin
end.

Как видно в ней 3 функции: первые 2 принимают по одному параметру, третья не принимает. Так вот, как мне её откомпилировать? какие параметры задать функциям? Я компилирую её следующим образом: Run/Parameters... в окне Parameters ввожу 2 параметра через пробел. Библиотека не компилится. Может я что не так делаю?

Mim1 (2004-09-22 15:59:00) [1]

> [2] jack128 © (21.09.04 19:37)

ctrl+f9 тут уместнее

B-boy Dimo-N (2004-09-22 15:55:00) [2]
Да будет свет! сказал поэт...
Всем спасибо, всё работает.

Digitman (2004-09-22 14:59:00) [3]

> какие-то ошибки

нехай Лермонтов разбирается, что за ошибки ... не царское это дело - в ошибках ковыряться

Amoeba (2004-09-22 14:19:00) [4]
А ты хоть прочитал, какой текст Delphi тебе сгенерила в начале модуля твоей DLL? Кто будет за тебя прописывать ShareMem в Uses? Пушкин?

B-boy Dimo-N (2004-09-22 14:11:00) [5]
Мммм дяяя, комментирую 2 функции, третью оставляю (притом не важно какие), нажимаю F9. Далее копмилирую свой проект, вроде функуия сробатывает, но потом, при закрытии проекта Функцией Close, выскакивают какие-то ошибки. Глюки за глюками. Вроде и функции в dll простенькие.

jack128 (2004-09-21 19:37:00) [6]
Эта... Как всегда, в общем то. F9. Запустить ты, ессесено, нечего не сможешь, но dll'ку на выходе получишь... Отладка делается через указание host приложения...

Palladin (2004-09-21 19:33:00) [7]
ты поди ее запустить пытаешься...

Наверх

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