перечисления..

← →
hbreaker (2006-06-21 11:46) [0]

Пытаюсь скомпилировать FastLib под Delphi 7, уже почти всё получилось... только вот такая глупая ошибка, я не пойму в чём дело.

в файле FastImg опиан такой тип

TDrawStyle=(dsDraw,dsStretch,dsResize,dsTile,dsCenter);

...

TFastIMG=class(TCustomControl) property DrawStyle:TDrawStyle read fDrawStyle write SetDrawStyle;

дальше в моём модуле такой код

procedure TForm1.Resize1Click(Sender: TObject); begin Last.Checked:=False; Form2.FastIMG1.DrawStyle:=dsResize; Resize1.Checked:=True; Last:=Resize1; end;

выдает ошибки

[Error] Unit1.pas(141): Undeclared identifier: "dsDraw" [Error] Unit1.pas(149): Undeclared identifier: "dsCenter" [Error] Unit1.pas(157): Undeclared identifier: "dsStretch" [Error] Unit1.pas(165): Undeclared identifier: "dsResize" [Error] Unit1.pas(173): Undeclared identifier: "dsTile"

я в замешательстве... всё ж должно работать. может это связано с изменением синаксиса в Delphi 7, код который исправляю под Delphi 5..

что не так?
почему оно не видит dsResize? когда может видеть тип TDrawStyle

← →
Amoeba © (2006-06-21 11:53) [1]

А в uses добавил FastImg?

← →
hbreaker (2006-06-21 12:01) [2]

гы:)) там его не было в uses...
а тип TDrawStyle всё равно находило:)
+пример под Delphi 5, там его не было в uses вписано:))

← →
hbreaker (2006-06-21 12:02) [3]

сейчас прописал и работает

перечисления.. Найти похожие ветки