Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.03;
Скачать: CL | DM;

Вниз

TInifiles   Найти похожие ветки 

 
Klopan ©   (2004-09-16 16:54) [0]


function LoadConfig(s: string): integer;
var
 inifile : TIniFile;
begin
 result:= 0;
 IniFile := TIniFile.Create(cfgfile);
try
 with inifile do begin
  result := ReadInteger("Main", s, 0);
 end;
finally
 inifile.Free;
end;
end;

procedure Saveconfig(st: string; num: integer);
var
 inifile : TIniFile;
begin
 IniFile := TIniFile.Create(cfgfile);
try
 with inifile do begin
    WriteInteger("Main", st, num);
   end;
 finally
  inifile.Free;
 end;
end;


надо чтоб это работало (появляется ошибка мол s и st должны быть постоянными)


 
Amoeba ©   (2004-09-16 16:57) [1]

function LoadConfig(const s: string): integer;
.....

procedure Saveconfig(const st: string; num: integer);
.....


 
Klopan ©   (2004-09-16 17:02) [2]

мне нужно чтоб были переменными


 
kukuikar ©   (2004-09-16 17:09) [3]

должны...
нужно...
Они у тебя будут перемнными при выполнении функции.
ты ее можешь выполнить несколько раз и каждый раз с разными файлами, КОТОРЫЕ ВНУТРИ ФУНКЦИИ БУДУТ КОНСТАНТАМИ!!!!!!!


 
kukuikar ©   (2004-09-16 17:11) [4]

const знвчит что внутри функции они постоянные.
внутри функции они же у тебя не меняются.


 
kukuikar ©   (2004-09-16 17:13) [5]

LoadConfig("config1.ini);
LoadConfig("config2.ini);
LoadConfig("config3.ini);
...
Saveconfig(config1; 0);
Saveconfig(config2; 1);
Saveconfig(config3; 2);
а внутри функции они постоянные!!!!!!!


 
Klopan ©   (2004-09-16 17:27) [6]

проблема не в этом, а вот в чем


const cfgfile = "c:\cfg.ini";
var count: integer;
...

procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
 Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
count:= LoadConfig(request.Query);
inc(count, 1);
SaveConfig(request.Query, count);
end;


нужно чтоб когда в строке адреса вписываешь с параметром, это параметр считывался.
например: адрес: http://site.ru?num/
и из ini файла считается параметр num.


 
Amoeba ©   (2004-09-16 17:31) [7]

В огороде бузина, а в Киеве дядька.


> нужно чтоб когда в строке адреса вписываешь с параметром,
> это параметр считывался.
> например: адрес: http://site.ru?num/
> и из ini файла считается параметр num.

Считывается то, что считываешь...


 
Klopan ©   (2004-09-16 17:34) [8]

оно не считывается т.к этот параметр - переменная


 
Amoeba ©   (2004-09-16 17:40) [9]

LMD! Других слов уже нет.


 
Klopan ©   (2004-09-16 17:47) [10]

короче это невозможно?


 
kukuikar ©   (2004-09-16 17:52) [11]

чего-то я уже ничего непонимаю
тебе чего надо, чтобы считывался или чтобы ошибок не возникало?


 
Klopan ©   (2004-09-16 17:58) [12]

чтобы считывался параметр который в адресе


 
Amoeba ©   (2004-09-16 18:03) [13]


> Klopan ©   (16.09.04 17:58) [12]
> чтобы считывался параметр который в адресе

Так считав числовой параметр из ini преобразовывай его в строку и вставляй ее в адрес на место num.


 
Klopan ©   (2004-09-16 18:11) [14]

вот другой пример:
на форме edit, label, button.

в edit вписанно "Value", при нажатии на кнопку, должен считаться параметр Value из ini файла и появиться на label


 
Sergey Kaminski ©   (2004-09-16 20:03) [15]

Не твое это, брось...


 
ssk ©   (2004-09-16 21:56) [16]

:-)


 
SergP.   (2004-09-17 08:53) [17]


>  [14] Klopan ©   (16.09.04 18:11)
> вот другой пример:
> на форме edit, label, button.
>
> в edit вписанно "Value", при нажатии на кнопку, должен считаться
> параметр Value из ini файла и появиться на label


Параметр Value какой секции?

...
labe11.caption := Inifile.ReadString("MySection", edit1.text, 0);
...



Страницы: 1 вся ветка

Текущий архив: 2004.10.03;
Скачать: CL | DM;

Наверх




Память: 0.5 MB
Время: 0.03 c
1-1095255534
Gemini
2004-09-15 17:38
2004.10.03
Ширина кнопки


1-1094656909
guest_Dmitry
2004-09-08 19:21
2004.10.03
Почему умирает иконка в трее?


4-1092993787
Adil
2004-08-20 13:23
2004.10.03
Как блокировать клавиатуру и мышку


8-1089184267
Ale}{(is)
2004-07-07 11:11
2004.10.03
Алгоритм «интеллектуального» обеднения палитры


4-1092953711
ZeBriD
2004-08-20 02:15
2004.10.03
как можно вывести комп из спящего режима?