столкнулся с таким что данный код
CODE:char c[256];
int check2, check3, check4;
string edit0;
string combo0;
check2=getcontrol(CHECK_2);
check3=getcontrol(CHECK_3);
check4=getcontrol(CHECK_4);
edit0=getcontrol(EDIT_0);
combo0=getcontrol(COMBO_0);
if (fopen (format(#c[0])+"\configG.ini", "w")!=0)
{
fwrite(check2);fwrite (ENDL);
fwrite(check3);fwrite (ENDL);
fwrite(check4);fwrite (ENDL);
fwrite(edit0);fwrite (ENDL);
fwrite(combo0);fwrite (ENDL);
fclose();
}
/////////////////////////////////
INITDIALOG
{
external(INT, "GetEnvironmentVariable", "GetEnvironmentVariableA", "Kernel32.dll");
GetEnvironmentVariable("USERPROFILE", address(#c[0]), sizearray(c));
if (fopen (format(#c[0])+"\configG.ini", "r")!=0)
{
fread(check2);
fread(check3);
fread(check4);
freadline(edit0);
freadline(combo0);
fclose();
sendcontrol(CHECK_2, check2);
sendcontrol(CHECK_3, check3);
sendcontrol(CHECK_4, check4);
sendcontrol(EDIT_0, edit0);
sendcontrol(COMBO_0, combo0);
}
}
CREATE_INTERFACE
{
DIALOG "Название окна" 237 180 //РазмерX РазмерY
BUTTONSCRIPT "Запустить" 125 121 100 25 //ПозицияX ПозицияY РазмерX РазмерY
//Добавление контролов управления ......
EDIT_0 "Текст по умолчанию" 10 8 120 18 //ПозицияX ПозицияY РазмерX РазмерY
CHECK_2 0 /*Выключена*/ "Включить опцию 1" 10 30 105 18 //ПозицияX ПозицияY РазмерX РазмерY
CHECK_3 0 /*Выключена*/ "Включить опцию 2" 10 50 105 18 //ПозицияX ПозицияY РазмерX РазмерY
CHECK_4 0 /*Выключена*/ "Включить опцию 3" 10 70 105 18 //ПозицияX ПозицияY РазмерX РазмерY
COMBO_0 0 /*Начальный выбор*/ "Выбор строки 1" | "Выбор строки 2" | "Выбор строки 3" 10 90 212 200 //ПозицияX ПозицияY РазмерX РазмерY_выпадающий список
}
при запуске с киборга работает как нужно но когда я собираю его в ехе он перестает срабатывать, с кодом на проверку CODE:int result = fopen (format(#c[0])+"\configG.ini", "w");
messagebox(result); // если файл открылся, будет число больше 0
if (result != 0)
с киборга он возвращает fopen а с ехе вообще не чего не происходит
Забыл добавить что первый запуск он все заполнил но после того как я удалил этот файл настроек он перестал работать и больше не хочет на него реагировать дальше если я с киборга его запускаю и выставляю что нужно он его не понимает(Отредактировано автором: 24 Декабря, 2023 - 10:00:59) |