Показать сообщение отдельно
(#44 (permalink))
Старый
CXZ
Гость
 
Сообщения: n/a
По умолчанию 05.07.2005, 21:23

Вобщем граждане вышла неувязочка. Выкладываю: когда я запустил свой прог с использованием ДЛЛ, начало выбивать ошибку о несовместимости типов. Посему я вкладываю в это сообщение заархивированый юнит, содержищий типы. Он используется как моей прогой, так и ДЛЛ. НЕ ИЗМЕНЯЙТЕ НАЗВАНИЕ И СОДЕРЖИМОЕ ЮНИТА! Разпакуйте архив в папку с проэктом ДЛЛ, а код ДЛЛ измените следующим образом:

library Project2;

uses
SysUtils,unit2, //обязательно допишите!
Classes;

{type
XO = (n,o,x);
maping=array [0..14,0..14]of xo;
!!! эти строки можно и удалить
Hodi = record
x_,y:integer;
end; }


function Hod( Map_:maping;Wis:xo):hodi;
var a,b:integer;
begin
;{тута типа ваши мысли}
end;
exports hod index 1;
{$R *.res}
begin
end
.

теперь должно быть всё нормально )
Вложения
Тип файла: rar Unit2.rar (230 байт, 6 просмотров)
Ответить с цитированием