ftp.sanbilgisayar.com/ftp.sanbilgisayar.com.tar/ftp.sanbilgisayar.com/SHOP/ShopImportP.exe/0/RCDATA/TSEJSYNCFORM/TSEJSYNCFORM.txt

Text File | 2015-03-03 | 4KB | 186 lines

object SejSyncForm: TSejSyncForm
  Left = 223
  Top = 117
  Width = 860
  Height = 604
  Caption = 'Sejour Senkronizasyon'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl: TPageControl
    Left = 0
    Top = 46
    Width = 852
    Height = 26
    ActivePage = TabBolge
    Align = alTop
    Style = tsFlatButtons
    TabIndex = 1
    TabOrder = 0
    TabWidth = 75
    OnChange = PageControlChange
    object TabOtel: TTabSheet
      Caption = 'Oteller'
    end
    object TabBolge: TTabSheet
      Caption = 'B'#246'lgeler'
      ImageIndex = 1
    end
    object TabRehber: TTabSheet
      Caption = 'Rehberler'
      ImageIndex = 2
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 852
    Height = 39
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 1
    object SyncBtn: TSpeedButton
      Left = 4
      Top = 2
      Width = 157
      Height = 31
      Caption = 'Senkronize i'#351'lemini ba'#351'lat...'
      Flat = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      OnClick = SyncBtnClick
    end
  end
  object ProgressBar: TProgressBar
    Left = 0
    Top = 39
    Width = 852
    Height = 7
    Align = alTop
    Min = 0
    Max = 100
    Smooth = True
    Step = 1
    TabOrder = 2
  end
  object GridOtel: TDBGridEh
    Left = 0
    Top = 72
    Width = 852
    Height = 502
    Align = alClient
    AllowedOperations = []
    Ctl3D = True
    DataSource = SonucMemDS
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghPreferIncSearch]
    ParentCtl3D = False
    TabOrder = 3
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    VertScrollBar.VisibleMode = sbAlwaysShowEh
  end
  object SejourQry: TMSQuery
    Connection = mDM.SejourDB
    Left = 236
    Top = 164
  end
  object SejourDS: TDataSource
    DataSet = SejourQry
    Left = 236
    Top = 232
  end
  object SonucMem: TkbmMemTable
    Active = True
    DesignActivation = True
    AttachedAutoRefresh = True
    AttachMaxCount = 1
    FieldDefs = <
      item
        Name = 'OK'
        DataType = ftBoolean
      end
      item
        Name = 'Kodu'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'Adi'
        DataType = ftString
        Size = 100
      end
      item
        Name = 'Aciklama'
        DataType = ftString
        Size = 200
      end>
    IndexDefs = <>
    SortOptions = []
    PersistentBackup = False
    ProgressFlags = [mtpcLoad, mtpcSave, mtpcCopy]
    FilterOptions = []
    Version = '3.09'
    LanguageID = 0
    SortID = 0
    SubLanguageID = 1
    LocaleID = 1024
    Left = 340
    Top = 164
    object SonucMemOK: TBooleanField
      DisplayWidth = 5
      FieldName = 'OK'
    end
    object SonucMemKodu: TStringField
      DisplayLabel = 'Kodu '
      DisplayWidth = 33
      FieldName = 'Kodu'
    end
    object SonucMemAdi: TStringField
      DisplayLabel = 'Ad'#305
      DisplayWidth = 37
      FieldName = 'Adi'
      Size = 100
    end
    object SonucMemAciklama: TStringField
      DisplayLabel = 'Kopyalama A'#231#305'klamas'#305
      DisplayWidth = 42
      FieldName = 'Aciklama'
      Size = 200
    end
  end
  object SonucMemDS: TDataSource
    DataSet = SonucMem
    Left = 340
    Top = 232
  end
  object QExec: TMSQuery
    Connection = mDM.MSConnection
    Left = 440
    Top = 160
  end
end