Вниз
Скачать: CL | DM;

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

 
Narik ©   (2004-12-26 04:13) [0]

Как записать и извлекать с ini CheckBox???


 
Fay ©   (2004-12-26 04:39) [1]

Чё?


 
KilkennyCat ©   (2004-12-26 04:48) [2]

легко.

объявлям  Ini: TIniFile;
создаем инифайл Ini := TIniFile.Create("checkbox1.ini");
внуТРУ пишем параметры, характеризирующие ческобох (используя WriteInteger, WriteString и проч):
Action
Align
AlignDisabled
Alignment
AllowGrayed
Anchors
BiDiMode
BoundsRect
Brush
Caption
Checked
ClientHeight
ClientOrigin
ClientRect
ClientWidth
Color
ComObject
ComponentCount
ComponentIndex
Components
ComponentState
ComponentStyle
Constraints
ControlCount
Controls
ControlState
ControlStyle
Ctl3D
Cursor
DesignInfo
DockClientCount
DockClients
DockOrientation
DoubleBuffered
DragCursor
DragKind
DragMode
Enabled
Floating
FloatingDockSiteClass
Font
Handle
Height
HelpContext
HelpKeyword
HelpType
Hint
HostDockSite
Left
LRDockWidth
Name
Owner
Parent
ParentBiDiMode
ParentColor
ParentCtl3D
ParentFont
ParentShowHint
ParentWindow
PopupMenu
ShowHint
Showing
State
TabOrder
TabStop
Tag
TBDockHeight
Top
UndockHeight
UndockWidth
VCLComObject
Visible
VisibleDockClientCount
Width
WindowProc

извлекать почти также.


 
begin...end ©   (2004-12-26 11:40) [3]

> Narik ©   (26.12.04 04:13)

> Как записать и извлекать с ini CheckBox???

Может быть, нужно записывать в ini-файл просто состояние CheckBox"а - отмечен / не отмечен? Тогда записывайте в файл значение свойства Checked.

Пример записи:

begin
with TIniFile.Create("c:\file.ini") do
 try
   WriteBool("CheckBox", "Checked", MyCheckBox.Checked)
 finally
   Free
 end
end.


Пример чтения:

begin
with TIniFile.Create("c:\file.ini") do
 try
   MyCheckBox.Checked := ReadBool("CheckBox", "Checked", False)
 finally
   Free
 end
end.



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.031 c
4-1101201473
-SeM-
2004-11-23 12:17
2005.01.16
Хендл KERNEL32


3-1103106176
Pavelkq
2004-12-15 13:22
2005.01.16
Выбор типа базы.


14-1104045972
Лох(
2004-12-26 10:26
2005.01.16
13 % от зарплаты (при договоре), куда они идут?


3-1102874458
korvin
2004-12-12 21:00
2005.01.16
Парадокс с выходными данными в серверной процедуре


1-1104751746
t4
2005-01-03 14:29
2005.01.16
ShellListView




   Наверх