home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 1999 October
/
PCWorld_1999-10_cd2.bin
/
Supreme
/
_SETUP.1
/
Contact.exe
/
0
/
RCDATA
/
TFORMPROSTRKOLIZE
/
TFORMPROSTRKOLIZE.txt
< prev
Wrap
Text File
|
1999-09-06
|
3KB
|
154 lines
object FormProstrKolize: TFormProstrKolize
Left = 297
Top = 212
BorderStyle = bsDialog
Caption = 'Kolize prost�edk�'
ClientHeight = 234
ClientWidth = 419
Color = clBtnFace
ParentFont = True
OldCreateOrder = True
Position = poScreenCenter
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 8
Top = 8
Width = 401
Height = 181
Shape = bsFrame
end
object Image1: TImage
Left = 20
Top = 20
Width = 32
Height = 32
AutoSize = True
Picture.Data = {<image000.ico>}
end
object LblMsg: TLabel
Left = 76
Top = 32
Width = 317
Height = 13
Caption = 'Prost�edek je ji� rezervov�n. M� se p�esto pokra�ovat?'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object StaticUser: TStatic
Left = 136
Top = 120
Width = 245
Height = 21
end
object StaticOd: TStatic
Left = 136
Top = 148
Width = 113
Height = 21
end
object Label2: TLabel
Left = 48
Top = 124
Width = 82
Height = 13
Caption = 'Rezervov�no pro'
Transparent = True
end
object Label3: TLabel
Left = 45
Top = 152
Width = 85
Height = 13
Caption = 'Interval rezervace'
Transparent = True
end
object StaticEvent: TStatic
Left = 136
Top = 92
Width = 245
Height = 21
end
object Label4: TLabel
Left = 94
Top = 96
Width = 36
Height = 13
Caption = 'Ud�lost'
Transparent = True
end
object StaticDo: TStatic
Left = 256
Top = 148
Width = 113
Height = 21
end
object StaticProstr: TStatic
Left = 136
Top = 64
Width = 153
Height = 21
end
object Label1: TLabel
Left = 78
Top = 68
Width = 52
Height = 13
Caption = 'Prost�edek'
end
object BtnYes: TButton
Left = 87
Top = 200
Width = 75
Height = 25
Caption = '&Ano'
Default = True
ModalResult = 6
TabOrder = 0
end
object BtnNo: TButton
Left = 167
Top = 200
Width = 75
Height = 25
Caption = '&Ne'
ModalResult = 7
TabOrder = 1
end
object BtnCancel: TButton
Left = 247
Top = 200
Width = 75
Height = 25
Cancel = True
Caption = 'Storno'
ModalResult = 2
TabOrder = 2
end
object Wallpaper1: TWallpaper
ResourceName = 'WALLPAPER'
Left = 8
Top = 196
end
object QryEventInfo: TQuery
DatabaseName = 'BRAIN_'
SQL.Strings = (
'SELECT nazev, jmeno, prijmeni, id_pracovnik'
'FROM ukoly uk, uzivatele uz'
'WHERE (uk.id_pracovnik = uz.id) and (uk.id= :event)')
Left = 36
Top = 196
ParamData = <
item
DataType = ftUnknown
Name = 'event'
ParamType = ptUnknown
end>
end
end