Привет. Помогите создать DLL, которую можно выполнить в командной строке. Пример не помешает.

А кто её выполнять будет? У dll нет "точки входа", следовательно обычный запуск как EXE с DLL сделать нельзя, т.е. имеется ввиду что DLL будет запускать другая программа - ну так в чём проблема - пишешь любую DLL, а так же программу которая будет распознавать функции твоей DLL и ассоциируешь DLL с твоей программой. Ничего выходящего за рамки создания самой что ни на есть стандартной DLL и программы её вызова здесь нет. Если ты хочешь чтобы DLL запускалась какой-то определённой программой, то желательно бы указать какой, телепатов тут вроде как нет.

Скорее всего запуск с помощью Rundl32

Вот, нашел в каком-то факе:

Вы должны определить в программе вызываемую снаружи функцию.
Функция должна быть __stdcall (или WINAPI, что то же самое ;)) и иметь
четыре аргумента. Первый - HWND окна, порождаемого rundll32 (можно использовать в качестве owner'а своих dialog box'ов), второй - HINSTANCE задачи, третий - остаток командной строки (LPCSTR, даже под NT), четвертый - не знаю ;). Hапример,
int __stdcall __declspec(dllexport) Test
(
HWND hWnd,
HINSTANCE hInstance,
LPCSTR lpCmdLine,
DWORD dummy

)
{
MessageBox(hWnd, lpCmdLine, "Command Line", MB_OK);
return 0;
}
===

rundll32 test.dll,_Test@16 this is a command line
===
выдаст message box со строкой "this is a command line".

Vit, как это у длл нет точки входа? А что такое DllEntryPoint?

Цитата

Vit, как это у длл нет точки входа? А что такое DllEntryPoint?

Это разные вещи. Если я не ошибаюсь, DLLEntryPoint выполняется при загрузке ДЛЛ системой, но это самая обычная ф-ция, которой через стек передаются параметры (в отличие от ехе, там через регистры). DllEntryPoint возвратит значение, но после етого ДЛЛ ведь не выгружается (в отличие от ехе).

Если не жалко и есть время, переведите этот код на Делфи, а то я с СИ не очень дружу.

Код

int __stdcall __declspec(dllexport) Test ( HWND hWnd, HINSTANCE hInstance, LPCSTR lpCmdLine, DWORD dummy ) { MessageBox(hWnd, lpCmdLine, "Command Line", MB_OK); return 0; } === rundll32 test.dll,_Test@16 this is a command line ===

DllEntryPoint вызавется в четырех случаях:

1. Загрузка в адресное пространство процеса.
2. Выгрузка из адресного пространства процеса.
3. При появлении новой нитки в процесе.
4. При удалении нитки из процеса.

перевод:

function Test(hWnd, hInstance: Integer; lpCmdLine: PChar; dummy: Integer): Integer; stdcall;
begin
MessageBox(hWnd, lpCmdLine, "Command Line", MB_OK);
Result := 0;
end;

=======

rundll32 test.dll,Test this is a command line

Это сообщение отредактировал(а) cully - 3.2.2003, 21:06

Спасибо.

А как привязать строку, прописанную в реестре:

C:\WINDOWS\rundll32.exe shell32.dll,Control_RunDLL %1,%*

...к запуску своего CPL файла?

Свой CPL файл будет запускаться без проблем без всяких изменений в реестре

Мой CPL не хочет запускатся, если щелкнуть по нему правой кнопкой мышки и выбрать пункт "Открыть с помощью Панели Управления", а Майкрософтские аплеты запускаються.

Похоже что неправильно написан.

Написан правильно! Вот:

Код

function CPlApplet(CPlHandle: HWnd; uMsg: Word; AppletNo, lParam2: LongInt) : LongInt; stdcall; var  NewCPlInfo : PNewCPlInfo; begin  Result := 0;  case uMsg of    CPL_INIT:    begin      ModuleHandle := GetModuleHandle('Sredit.cpl');      Result := LongInt(ModuleHandle <> INVALID_HANDLE_VALUE);      //Result := 1;    end;    CPL_GETCOUNT: Result := 1;    CPL_NEWINQUIRE:    begin      NewCPLInfo := PNewCPLInfo(lParam2);      NewCplInfo^.Size := SizeOf(TNewCPlInfo);      NewCPlInfo^.Flags := 0;      NewCplInfo^.HelpContext := 0; // Context in you help file!      NewCplInfo^.Data := 0;      NewCplInfo^.Icon := LoadIcon(hInstance, MakeIntResource(2));      lStrCpy(@PNewCplInfo(lParam2)^.Name, PChar(TextFromStringsResource(1)));      lStrCpy(PNewCplInfo(lParam2)^.Info, PChar(TextFromStringsResource(2)));      NewCPlInfo^.HelpFile := #0; // Path for your helpfile    end;    CPL_SELECT: Result := 0;    CPL_DBLCLK:      //Запуск диалогового окна      DialogBoxParam(HInstance, MAKEINTRESOURCE(100), ModuleHandle, @DlgAboutFunc, ModuleHandle);    CPL_STOP: Result := 0;    CPL_EXIT: Result := 0;    else Result := 0;  end; end; exports CPlApplet name 'CPlApplet';

Так что? Не знаем