Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Ошибка при копиляции из Delphi 7 в Delphi 2010 [XP]


worldmen ©   (2010-05-06 21:28:00) 

Решил попробовать преревести прогу в Delphi 2010. При компиляции выводит ошибку:
[DCC Error] ice.pas(581): E2064 Left side cannot be assigned to
Строка:

type
 TKoordinate = object
   x, y, x2, y2 : integer;
 end;
....
Var SStop : TKoordinate;
...
procedure ...
begin
SStop.y:=Screen.Height - 50;

...
end;
В чем проблема?


worldmen   (2010-05-12 10:44:00) [1]

> Плохиш ©   (11.05.10 10:57) [7]
> PS. Но так как я сегодня добрый, то скажутакое объявление
> >    property  varIniF   : TMyIniFile read FVarIniF;не позволит
> изменить данное свойство не только в d2010, но и в d7

Я проверил (протрассировал) - все работает и не выдает ошибки в Delphi 7.
Спасибо за подсказку Омлет -
with FVarIniF do begin
все получилось


Плохиш   (2010-05-11 10:57:00) [2]

PS. Но так как я сегодня добрый, то скажу
такое объявление

>    property  varIniF   : TMyIniFile read FVarIniF;

не позволит изменить данное свойство не только в d2010, но и в d7


Омлет   (2010-05-11 10:56:00) [3]

Замени
> with varIniF do begin

на
> with FVarIniF do begin


Плохиш   (2010-05-11 10:53:00) [4]


> worldmen   (11.05.10 10:31) [4]
>
> Еще кое-что забыл.

и привёл опять куски несвязного кода. Вспоминай дальше.
Приведённый дерьмокод такой ошибки не вызывает.


worldmen   (2010-05-11 10:31:00) [5]

Еще кое-что забыл. Тут видимо неправильно я свойство использую:

TMyIniFile = record
   Login         : TButText;
   Undok,  SelectAll,    SelectAllTo,  ShieldB :  TKoordinate;  
   Zakladki  :  TKoordinate2;  
   Stantion :  integer;      
   FileIni    : String;        
 end;

TForm1 = class(TForm)
...
private
   FVarIniF :  TMyIniFile;
public
   property  varIniF   : TMyIniFile read FVarIniF;

implementation

procedure ...
begin
 with varIniF do begin
   SStop.y:=Screen.Height - 50;  // - тут ругается
...
end;


[DCC Error] ice.pas(581): E2064 Left side cannot be assigned to


Loginov Dmitry   (2010-05-06 22:11:00) [6]


> В чем проблема?


На пустом проекте все прекрасно скомилировалось. Может какие опции компиляции выставлены? (object в Delphi популярностью не пользуется).


Игорь Шевченко   (2010-05-06 22:06:00) [7]

TKoordinate = record


worldmen   (2010-05-06 21:30:00) [8]

Забыл. Ругается на строку
SStop.y:=Screen.Height - 50;


Наверх

Титульная страница Поиск, карта сайта Написать письмо