• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

Работа с Ini файлам

  • Автор темы KuevProger
  • Дата начала
Статус
Закрыто для дальнейших ответов.
K

KuevProger

Код:
procedure Logical_indikator;
var
i:integer;
Ini: Tinifile;
begin
for i:=1 To 7 do
begin
Logic[i].Value_V:=Value[i];
ini:=TiniFile.Create(extractfilepath(paramstr(0))+'NetronPow.ini');
>>>>>If  (Logic[i].Value_V>=Ini.ReadFloat('Diapazon','Dreyf_nill_min','')) and (Logic[i].Value_V<=Ini.ReadFloat('Diapazon','Dreyf_nill_max','')) Then Logic[i].Value_Log:=0;
If  (Logic[i].Value_V>=4.5) and (Logic[i].Value_V<=5.5) Then Logic[i].Value_Log:=1;
Ini.Free;
If	Logic[i].Value_Log=0 Then Logic[i].Indikator.Brush.Color:=clLime;
If	Logic[i].Value_Log=1 Then Logic[i].Indikator.Brush.Color:=clRed;
end;
end;
[Error] U_Main.pas(296): Incompatible types: 'Double' and 'String'
Я понимаю что идет несовместимость типов но что сделать хз...
Имеется ввиду ReadFloat на что надо заменить?
 
K

KuevProger

Код:
procedure Logical_indikator;
var
i:integer;
Ini: Tinifile;
begin
for i:=1 To 7 do
begin
Logic[i].Value_V:=Value[i];
ini:=TiniFile.Create(extractfilepath(paramstr(0))+'NetronPow.ini');
>>>>>If  (Logic[i].Value_V>=Ini.ReadFloat('Diapazon','Dreyf_nill_min','')) and (Logic[i].Value_V<=Ini.ReadFloat('Diapazon','Dreyf_nill_max','')) Then Logic[i].Value_Log:=0;
If  (Logic[i].Value_V>=4.5) and (Logic[i].Value_V<=5.5) Then Logic[i].Value_Log:=1;
Ini.Free;
If	Logic[i].Value_Log=0 Then Logic[i].Indikator.Brush.Color:=clLime;
If	Logic[i].Value_Log=1 Then Logic[i].Indikator.Brush.Color:=clRed;
end;
end;
[Error] U_Main.pas(296): Incompatible types: 'Double' and 'String'
Я понимаю что идет несовместимость типов но что сделать хз...
 
Статус
Закрыто для дальнейших ответов.
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!