Вопрос про DLL-файлы

[PChEL@]

Здарова всем.
в проекте DDL пишу 2 процедуры
procedure WritePropertyFont(Font: TFont;ASection,FN: string);
var
IniFile : TIniFile;
begin
IniFile := TIniFile.Create(FN);
IniFile.WriteString(ASection,'Size' ,IntToStr(Font.Size));
IniFile.Free;
end;
procedure ReadPropertyFont(Font: TFont;ASection,FN: string);
const
S = '0';
var
IniFile : TIniFile;
begin
IniFile := TIniFile.Create(FN);
Font.Size := StrToInt(IniFile.ReadString(ASectio n,'Size',s));
IniFile.Free;
end;
компелирую.
в модуле формы допустим на нажатие кнопки пишу

WritePropertyFont(RichEdit1.Font,'R ichEditFont','C:/Configuration.ini');
Компелируем и запускаем. сначала после запуска проекта всё нормально, но как только в программе
я изменю размер шрифта вылезает сообщение
"Access violation at address 0041C313 in module 'Project1.exe'. Read of address 00000000" нажимаешь ОК. Однако в RichEdit1 размер изменяется
после этого сообщение не вылезает до следующего запуска программы.
Интересно, но когда эти 2 функции копируешь в модуль формы никаких ошибок не появляется.

[D-mon]

Ну и зачем ДЛЛ. В проекте и оставь, это не так важно де ты шрифт меняешь. ДЛЛ используються для другого немного. Для больших и частых вычислений, а это того нестоит.

[Jeni]

Наверное вся проблема в том, что в подпрограммы передаются строки. По этому поводду я совсем недавно писал в этой же ветке.
Чтобы библиотека нормально работала с передаваемыми строками, необходимо и в программе и в библиотеке в раздел uses добавить модуль ShareMem, причем этот модуль должен быть первым по списку!

[PChEL@]

Ну и зачем ДЛЛ

да потренироватся хотел их использовать, а тут ошибка такая непонятно в чём проблема.
Модуль ShareMem непомогает.
Посмотрите сами: вот проект (на Delphi 7)
pr.rar