вообщем я вызываю из user32 эту процедуру примерно так:
function MessageBox(hWnd: HWND; lpText, lpCaption: PChar; uType: UINT): Integer; external user32 name 'MessageBoxA';
вопрос такой : когда я работаю с формами я пишу вместо переменной hwnd типа form1.handle, а как мне быть когда я прогу всю пишу в .dpr файле?

| Сообщение посчитали полезным:

Ставь 0 не ошибешься ;)

| Сообщение посчитали полезным:

Мужик, ты по моему не по адресу... А вообще если пользуешь дельфи, то пиши на дельфи - нафига извращаться с API. А если всё-таки нужны API - переходи на VC++.

| Сообщение посчитали полезным:

Vedrus пишет:
А вообще если пользуешь дельфи, то пиши на дельфи - нафига извращаться с API. А если всё-таки нужны API - переходи на VC++.
Бредовое заявление...

| Сообщение посчитали полезным:

Vedrus,Ara
Только не начинайте священных войн за С++ и Дельфина.

NicknamES
Можешь спокойно передавать 0 (NIL/NULL). В чём проблема?

| Сообщение посчитали полезным:

Ara, поясню. Имхо, если при проектировании ПО выбрана какая-то технология, то и надо её придерживаться до конца. А то может получитсья как в мультике про защиту банка: Сейфы, подходы, двери защищены по после-завтречнему слову техники, а бабулька-уборщица заходит в этот сейф, через дверь с обычным врезным замком и ещё в добавок прячет ключ от этой двери тут же под крыльцом.

ЗЫ. Если вопрос не исчерпан, предлагаю перейти в личку.
ЗЫЫ. Интересное интервью получилось с Relayer'ом

| Сообщение посчитали полезным:

Vedrus
если я пишу на дельфи почему нельзячутьдопустим асм кода вставить lol

| Сообщение посчитали полезным:

Vedrus пишет:
Интересное интервью получилось с Relayer'ом
чем ? очередным пресс-релизом криптора ?

| Сообщение посчитали полезным:

read_me, а смысл? Я понимаю если охота выпендриться - тогда пожалуйста. Да, а ты в курсе что ассемблерные вставки в Паскале - это не асм, а его эмуляция? И при неумелом их использовании можно не убыстрить код, а существенно его замедлить! Например, при вызове из ассемблерной вставки прерывания 100% так оно и будет.

| Сообщение посчитали полезным:

Vedrus пишет:
Я понимаю если охота выпендриться - тогда пожалуйста
Скажи это Ms-Rem, умник
P.S. такие вопросы лучше вообще не поднимать - провокация для оффтопа

-----
Research is my purpose

| Сообщение посчитали полезным:

Vedrus пишет:
Например, при вызове из ассемблерной вставки прерывания 100% так оно и будет.
теперь всё с тобой понятно,дальнейший разговор с тобой некуда неприведёт
кстати некакая не эмуляция

| Сообщение посчитали полезным:

Vedrus пишет:
Да, а ты в курсе что ассемблерные вставки в Паскале - это не асм, а его эмуляция?
гг Вертуальная машына и ниибет...

Пример неумелого использования в студию...

| Сообщение посчитали полезным:

имхо топик стоит закрыть.
проблема не стоит выеденного яйца.
одна строка в некрософтовских манах дает осветление:
hWnd
Identifies the owner window of the message box to be created. If this parameter is NULL, the message box has no owner window.
велл дал ответ на вопрос.
а затем Vedrus что-то прогнал, лишь бы сказать. и начался оффтоп. хотя тема исчерпана в первом ответе.

| Сообщение посчитали полезным:

NicknamES пишет:
когда я работаю с формами я пишу вместо переменной hwnd типа form1.handle, а как мне быть когда я прогу всю пишу в .dpr файле?
Так просто создай окно, можно невидимое

uses Windows, Messages;

{$R rsrc.res}

const
IDD_MAIN = 1000;

var
hMainWnd: THandle;
Msg: TMsg;

function DlgProc(hwnd, wmsg, wParam, lParam: DWORD): LongBool; stdcall;
begin
Result := False;
case wmsg of
WM_INITDIALOG:
begin
MessageBox(hMainWnd, 'Text message...', 'Caption', MB_OK + MB_ICONINFORMATION);
end;

WM_CLOSE:
begin
EndDialog(hMainWnd, 0);
PostQuitMessage(0);
end;
end;

begin
hMainWnd := CreateDialog(hInstance, MAKEINTRESOURCE(IDD_MAIN), 0, @DlgProc);
while GetMessage(Msg, 0, 0, 0) do begin
TranslateMessage(Msg);
DispatchMessage(Msg);
end;
end.


| Сообщение посчитали полезным:

Огромное всем спасибо, звиняйте что занял ваше время, и попрошу админов закрыть этот топик!

| Сообщение посчитали полезным: