VPF::Проблема с OR - Форум программистов

Ak47black

Дата 20.4.2007, 15:01 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

Репутация: нет
Всего: 0

Неполучаеться выполнить следуший 'велосипедный код', вроде так ошибок невижу

Код


    if
      (  (OperationsList.Items.Item[i].Caption <> TransferModele.TransferingOperations[i].Name)
      or (OperationsList.Items.Item[i].SubItems.Strings[0] <> IntToStr(TransferModele.TransferingOperations[i].Size)
      or (OperationsList.Items.Item[i].SubItems.Strings[1] <> TransferModele.TransferingOperations[i].Source)
      or (OperationsList.Items.Item[i].SubItems.Strings[2] <> TransferModele.TransferingOperations[i].Destination)
      or (OperationsList.Items.Item[i].SubItems.Strings[3] <> TransferModele.TransferingOperations[i].Status)
      or (OperationsList.Items.Item[i].SubItems.Strings[4] <> TransferModele.TransferingOperations[i].AverangeSpeed)
      or (OperationsList.Items.Item[i].SubItems.Strings[5] <> TransferModele.TransferingOperations[i].CurrentSpeed)
      or (OperationsList.Items.Item[i].SubItems.Strings[6] <> TransferModele.TransferingOperations[i].Elapsed)
      or (OperationsList.Items.Item[i].SubItems.Strings[7] <> TransferModele.TransferingOperations[i].Left)
      ) then
      begin

Получаеться ошика

Цитата

[Error] Detailed.pas(258): Incompatible types: 'String' and 'Boolean'

TransferModele.TransferingOperations = TTranfereFile

Код


  TTranfereFile = record
    TransferingTape: TTransferingTape;
    State: TTransferingState;
    Name: String;
    Size: Int64;
    Source: String;
    Destination: String;
    FoldersPath: String;
    Status: String;
    AverangeSpeed: String;
    CurrentSpeed: String;
    Elapsed: String;
    Left: String;
    ID: Integer;
    Working: Boolean;
    Error: Boolean;
  end;

Вродебы грубых ошибок нету, всетаки в чем тут дело? Скорей всего в булевской логике ,но где ?

Snowy

Дата 20.4.2007, 15:08 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 31
Всего: 484

IntToStr(TransferModele.TransferingOperations[i].Size)
Скобку не закрыл

Ak47black

Дата 20.4.2007, 15:12 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

Репутация: нет
Всего: 0

ДА точно

А я тут думал что чтото посложней.
Сорри что туплю.

Snowy, +

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »