Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

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

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.05.2016, 15:28   #11
GreenWizard
мальчик-помогай =)
Форумчанин
 
Регистрация: 16.09.2010
Сообщений: 522
По умолчанию

в параметрах ShowForm, судя по всему
GreenWizard вне форума Ответить с цитированием
Старый 10.05.2016, 15:32   #12
nactyx
Форумчанин
 
Регистрация: 11.10.2010
Сообщений: 152
По умолчанию

Я сделал вот:
Код:
program RepLoadMachines;

uses
  Forms,
  Unit2 in 'Unit2.pas' {Form2};

{$R *.res}

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TForm2, Form2);
  Application.Run;
end.
Запускается безо всяких .dll, но два момента:
1. Как написал выше, про параметры из .dll
2. Справа в дереве проекта вместо .exe все равно проект с расширением .dll. Как заменить на .exe?
nactyx вне форума Ответить с цитированием
Старый 10.05.2016, 15:38   #13
nactyx
Форумчанин
 
Регистрация: 11.10.2010
Сообщений: 152
По умолчанию

Цитата:
Сообщение от GreenWizard Посмотреть сообщение
в параметрах ShowForm, судя по всему
Явно указал. Отрабатывает неправильно. И явно что-то делаю не так. Но мысль теряю, блин.

Последний раз редактировалось nactyx; 10.05.2016 в 15:40.
nactyx вне форума Ответить с цитированием
Старый 10.05.2016, 15:41   #14
nactyx
Форумчанин
 
Регистрация: 11.10.2010
Сообщений: 152
По умолчанию

Код:
program RepLoadMachines;

uses
  Forms,
  Unit2 in 'Unit2.pas' {Form3};

{$R *.res}

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TForm2, Form2);
  Application.Run;
end.
Код:
var
  Form2: TForm2;
  OrderMas : Orders;
  TemplareEXECL, SQLText : string;
  function ShowForm(ParametrsDLL : string) : TForm;//  export;  stdcall;
  procedure CloseForm();//  export;  stdcall;
  procedure start;

implementation

{$R *.dfm}

function ShowForm(ParametrsDLL : string) : TForm;
begin
 Form2:= TForm2.Create(Application);
 Form2.Parametrs := 'строка из dll';
 Form2.Show;
 Result := Form2;
 start;
end;

procedure CloseForm();
begin
  Form2.Free;
end;
Вот 100% где-то тут затык. Подозреваю что в первой части нужно использовать наверно не create, а show. Но не уверен.

Upd: судя по дебаггеру, в результате такого вот исправления - в showform компилятор вообще не попадает.

Upd: немного изменил настройки проекта и добавил несколько строк из showform в formcreate и уже работает. Теперь вопрос, как сделать так, чтобы в результате проекта был .exe и справа в дереве проекта тоже был .exe

Последний раз редактировалось nactyx; 10.05.2016 в 16:09.
nactyx вне форума Ответить с цитированием
Старый 10.05.2016, 16:11   #15
GreenWizard
мальчик-помогай =)
Форумчанин
 
Регистрация: 16.09.2010
Сообщений: 522
По умолчанию

напиши мне в вк или тут ЛС, мне проще по тимвью зайти и сделать
GreenWizard вне форума Ответить с цитированием
Старый 10.05.2016, 16:51   #16
nactyx
Форумчанин
 
Регистрация: 11.10.2010
Сообщений: 152
По умолчанию

Разобрался сам. Всем спасибо. Пока вопросов нет.
nactyx вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Инструкция для сборки приложений на Qt в один exe без зависимостей от libstdc++-6.dll, libgcc_s_dw2-1.dll, Qt5Core.dll и т.д. 8Observer8 Qt и кроссплатформенное программирование С/С++ 12 25.06.2015 03:18
Использование С# dll в проекте C++ Romowski Visual C++ 5 11.12.2012 08:59
C# & DLL: как указать, что загружать DLL нужно из ЗАДАННОЙ папки "D:\My\Path\a.dll" ? AntyDES C# (си шарп) 11 10.10.2012 20:00
Использование DLL от третьей стороны в своем проекте Yuran Общие вопросы Delphi 10 02.06.2008 19:04
Как избавиться от QTINTF70.DLL ? Aslan Общие вопросы Delphi 19 24.10.2007 16:53