Текущий архив: 2009.02.01;
Скачать: CL | DM;

Вниз

Stored   Найти похожие ветки 

← →
Test   (2008-12-20 16:05) [0]

Почему не сохраняет в DFM. Что я не так делаю?

unit Unit1;

interface

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs, StdCtrls, AppEvnts, ComCtrls;

type
 TForm1 = class(TForm)
   TrackBar1: TTrackBar;
   procedure TrackBar1Change(Sender: TObject);
   procedure FormCreate(Sender: TObject);
 private
   { Private declarations }
   FI: Integer;
 public
   { Public declarations }
   property I: Integer read FI write FI stored True;
 end;

var
 Form1: TForm1;

implementation

{$R *.dfm}

{ TForm1 }

procedure TForm1.TrackBar1Change(Sender: TObject);
begin
 FI := TTrackBar(Sender).Position;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
 ShowMessageFmt("%d", [I]); // return 0;
end;


---

← →
Leonid Troyanovsky ©   (2008-12-20 16:57) [1]

> Test   (20.12.08 16:05)
 
> Почему не сохраняет в DFM. Что я не так делаю?

Хелп не читаем?
RTFM: Storage specifiers.

--
Regards, LVT.

---

← →
Test   (2008-12-20 17:10) [2]

А можно конкретнее и желательно на русском, а то не совсем понятно.

---

← →
Leonid Troyanovsky ©   (2008-12-20 17:19) [3]

> Test   (20.12.08 17:10) [2]

>а то не совсем понятно.

Что конкретно?

Для остального есть, да хоть бы
http://translate.google.com/translate_t?hl=ru#
Ну, или книжку почитать хорошую.

--
Regards, LVT.

---

← →
Поросенок Винни-Пух ©   (2008-12-20 17:35) [4]

Почему не сохраняет в DFM.

Потому что это вообще не должно сохраняться в дфм.

---

← →
p177-bu11 inno 69   (2008-12-20 23:11) [5]

дфм вообще другой формат имеет. там почти как в хтмл (оообразно выражаясь (открывающий/закрывающий тег)) описываются контролы (их начальные свойства)

а это - совсем другое

---

Страницы: 1 вся ветка

Текущий архив: 2009.02.01;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.013 c