home *** CD-ROM | disk | FTP | other *** search
- object Form14: TForm14
- Left = 352
- Top = 167
- BorderStyle = bsNone
- Caption = 'Sat�lan Dairelerin Listesi'
- ClientHeight = 300
- ClientWidth = 300
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 300
- Height = 300
- AutoSize = True
- Picture.Data = {<image000.jpg>}
- OnMouseDown = Image1MouseDown
- end
- object Image2: TImage
- Left = 32
- Top = 240
- Width = 113
- Height = 38
- Picture.Data = {<image001.jpg>}
- Stretch = True
- Visible = False
- end
- object Image3: TImage
- Left = 160
- Top = 240
- Width = 113
- Height = 38
- Picture.Data = {<image002.jpg>}
- Stretch = True
- Visible = False
- end
- object Label1: TLabel
- Left = 40
- Top = 248
- Width = 97
- Height = 25
- Alignment = taCenter
- AutoSize = False
- Caption = 'Bul'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clLime
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- OnMouseDown = Label1MouseDown
- OnMouseUp = Label1MouseUp
- end
- object Label2: TLabel
- Left = 168
- Top = 248
- Width = 97
- Height = 25
- Alignment = taCenter
- AutoSize = False
- Caption = '��k��'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clLime
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- OnMouseDown = Label2MouseDown
- OnMouseUp = Label2MouseUp
- end
- object Label3: TLabel
- Left = 32
- Top = 224
- Width = 46
- Height = 13
- Caption = 'Ad Soyad'
- Transparent = True
- Visible = False
- end
- object SpeedButton1: TSpeedButton
- Left = 224
- Top = 216
- Width = 41
- Height = 21
- Caption = 'T�m�'
- OnClick = SpeedButton1Click
- end
- object DBGrid1: TDBGrid
- Left = 32
- Top = 64
- Width = 241
- Height = 145
- DataSource = DataSource1
- FixedColor = 8750469
- TabOrder = 0
- TitleFont.Charset = DEFAULT_CHARSET
- TitleFont.Color = clWindowText
- TitleFont.Height = -11
- TitleFont.Name = 'MS Sans Serif'
- TitleFont.Style = []
- OnDblClick = DBGrid1DblClick
- Columns = <
- item
- Expanded = False
- FieldName = 'Adsoyad'
- Visible = True
- end
- item
- Expanded = False
- FieldName = 'Semt'
- Visible = True
- end>
- end
- object Edit1: TEdit
- Left = 88
- Top = 216
- Width = 121
- Height = 21
- TabOrder = 1
- end
- object DataSource1: TDataSource
- DataSet = Query1
- Left = 184
- Top = 40
- end
- object Query1: TQuery
- Active = True
- SQL.Strings = (
- 'select * from satilandaireler')
- Left = 152
- Top = 56
- object Query1Adsoyad: TStringField
- DisplayWidth = 25
- FieldName = 'Adsoyad'
- end
- object Query1Semt: TStringField
- DisplayWidth = 18
- FieldName = 'Semt'
- Size = 15
- end
- object Query1Satilandno: TIntegerField
- FieldName = 'Satilandno'
- end
- end
- end
-