Неполучаеться выполнить следуший 'велосипедный код', вроде так ошибок невижу
| Код |
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;
|
Вродебы грубых ошибок нету, всетаки в чем тут дело? Скорей всего в булевской логике ,но где ? |
