[Budjaka]

Здравствуйте, ув. форумчане.
Ситуация просто идиотская. Пишу банальный код. В переменной время вида '12,56'. Нужно Час помножить на 60, а минуты поделить на 30. И сложить эти два значения. Делов на пару минут. Однако:
пишу код, тыкаю точку останова, смотрю в переменные. И вижу там :

Код:

procedure TFloads.ConvertTimeToPoint(IDAct: string);
var Mass : string;
MPoint,h,m : string;
Hour,Min,Total : integer;
begin
CheckPoint();
if CheckSumm = True then begin
Mass := IDAct;
  for i:= 0 to Listbox3.Count - 1 do begin
    MPoint := listbox3.Items[i];
    Delete(MPoint,1,1);
    H := Copy(MPoint,1,2);
    M := Copy(MPoint,4,2);
    Hour := StrToInt(H);
    Min := StrToInt(M);
    Total := Hour + Min;    
    Mass := Mass + ';' +  MPoint;
  end;
Listbox4.Items.Add(Mass);
end;
end;

Watch List

Код:

Watch Name	Value
H	'00'
M	'05'
MPoint	'00,05'
Mass	'Василий'
Min	E2171 Variable 'Min' inaccessible here due to optimization
Hour	E2171 Variable 'Hour' inaccessible here due to optimization
Total	E2171 Variable 'Total' inaccessible here due to optimization

У меня совсем мозги кипят по моему.
Почему я не могу Hour := StrToInt(H); - элементарно перетащить str в int ?
p.s. Embarcadero Turbo Delphi Explorer 2006
Есть прям стойкое желание выстрелить в монитор

[angvelem]

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

[Alegun]

Код:

procedure TFloads.ConvertTimeToPoint(IDAct: string);
var Mass : string;
MPoint,h,m : string;
i,Hour,Min,Total : integer;
begin
//CheckPoint();
if CheckSumm = True then begin
Mass := IDAct;
  for i:= 0 to Listbox3.Count - 1 do begin
    MPoint := listbox3.Items[i];
    //Delete(MPoint,1,1);
    H := Copy(MPoint,1,2);
    M := Copy(MPoint,4,5);
    Hour := StrToInt(H);
    Min := StrToInt(M);
    Total := Hour + Min;
    Mass := Mass + ';' +  MPoint;
   end;
Listbox1.Items.Add(Mass);
end;
end;

[angvelem]

Зря выкинул строку, возможно у ТС там убирается лишний символ.

[Budjaka]

Гугл в очередной раз меня выручил, не прошло и трех часов.
Как оказалось, Delphi по непонятным причинам, сама выпиливала мои переменные, т.к. они не использовались дальше оператора присвоения. зачем Делфя так делает - уму не постижимо.
А не использовал я их, т.к. желал сначала смотреть переменную.
Жуть в общем.
Спасибо всем кто откликнулся, монитор обязан вам жизнью.
p.s.
может пригодится ищущим :
при ошибке
E2171 Variable 'имя переменной' inaccessible here due to optimization
и невозможности ее просмотреть отладчиком, надобно куда нибудь эту переменную вывести, иначе оптимизатор кода в Делфях устраивает самодеятельность.

[angvelem]

Сообщение от Budjaka

...Как оказалось, Delphi по непонятным причинам, сама выпиливала мои переменные, т.к. они не использовались дальше оператора присвоения. зачем Делфя так делает - уму не постижимо.
А не использовал я их, т.к. желал сначала смотреть переменную.
Жуть в общем...

Стандартное поведение Дельфи, если переменная присвоена но дальше не используется зачем хранить ненужное. Это основы - азы программирования на Дельфи. Хочешь посмотреть, выведи их в какой-нибудь Caption, хотя бы формы, потом уберёщь.

[Alegun]

Сообщение от angvelem

Стандартное поведение Дельфи, если переменная присвоена но дальше не используется зачем хранить ненужное...

Оффтоп: В D7 такое прокатывает успешно ("стандартное":-), наверное такое поведение от ключей компилятора зависит или настроек среды.