Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

как загрузить тестовик из DLL [D7]

jcrush © (2005-02-18 02:59:00)
Нужно открыть файл в DLL такого вида:
auto-start-uin=6290800
желательно: IniFiles получить 6290800
Но не получается... есть варианты??

Digitman (2005-02-21 08:53:00) [1]

> jcrush (21.02.05 03:37) [12]

> значение есть

но оно не являет собой строковое представление Integer-значения.. оттого и EConvertException..

> [MAIN]
> нету то :((

значит IniFiles в дан.случае тебе не помощник.. хоть и "желательно"

jcrush (2005-02-21 03:37:00) [2]
EConvertException..
'' not Integer value

значение есть

Digitman (2005-02-18 08:50:00) [3]

> jcrush (18.02.05 06:03) [9]
> прога вылетает

что за детский сад ?
куда она у тебя "вылетает" ? рейсом в Майами что ли ?
ты в состоянии привести дословно сообщение об ошибке ?

jcrush (2005-02-18 06:15:00) [4]
Короче этот файл еще открыт :((

jcrush (2005-02-18 06:03:00) [5]
делаю так:
aaa := StrToInt(StringList.text);
прога вылетает

jcrush (2005-02-18 06:00:00) [6]
Получаю пустую строку :((
MessageBox(0,pchar(aaa),'ошщощш',0);

Kerk (2005-02-18 05:29:00) [7]
включу телепатию. если головой думать влом.. то:
StringList := TStringList.Create; StringList.LoadFromFile('G.m'); aaa := StrToInt(StringList.Values['auto-start-uin']); StringList.Free;

Kerk (2005-02-18 05:26:00) [8]
ты КОД ПОКАЖИ

jcrush (2005-02-18 03:44:00) [9]
Пытаюсь:
LoadFromFile('G.m');
Dll вылетает :((

jcrush (2005-02-18 03:43:00) [10]
а
ReadString('','PASSWORD','unknown');
не канает :((

jcrush (2005-02-18 03:41:00) [11]
[MAIN]
нету то :((

jcrush (2005-02-18 03:40:00) [12]
ну эт я знаю

GanibalLector (2005-02-18 03:16:00) [13]
>Но не получается... есть варианты??
Что именно не получается?
with TIniFile.Create(FName) do try Result.USER_NAME := ReadString('MAIN','USER_NAME','SYSDBA'); Result.PASSWORD := ReadString('MAIN','PASSWORD','unknown'); Result.ROLE := ReadString('MAIN','ROLE','ADMIN'); finally Free end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »