{{notification.text}}

MirGames

mov, просто mov
07.08.07 02:29
0
значит пытаюсь сделать OpenDialog через GetOpenFileName

вот код
Код

                        var
                          OpenDlg: TOpenFileName;

                        ZeroMemory(@OpenDlg, SizeOf(OpenDlg));
                        with OpenDlg do
                        begin
                          lStructSize   := SizeOf(OpenDlg);
                          hWndOwner     := Wnd.HwndGet;
                          lpstrFilter   := '3ds models (*.3ds)'#0'*.3ds'#0#0;
                          Flags         := OFN_NOCHANGEDIR;
                          nMaxFile      := 250;
                          nMaxFileTitle := nMaxFile;
                          GetMem(lpstrFile, nMaxFile);
                          ZeroMemory(lpstrFile, nMaxFile);
                        end;
                        if GetOpenFileName(OpenDlg) then
                        begin
                          ...
                        end;
                        FreeMem(OpenDlg.lpstrFile);
                      end;

значиться вылетает всё это дело на GetOpenFileName с ошибкой 6BAh (сервер RPC недоступен) которою ловит мой обработчик
вставляю код в чистое окно всё работает %) не подскажите в чём может быть проблема ?
#{{post.Index}}
{{post.Author.Login}}
{{post.CreatedDate | date:'dd.MM.yy HH:mm'}}
{{post.VotesRating}}
Отредактировано: {{post.UpdatedDate | date:'dd.MM.yy HH:mm'}}