ÿ TFORM_NEWKLIENT0 TPF0TForm_newklientForm_newklientLeftâTopl BorderStylebsDialogCaptionVytvoreni noveho klienta ClientHeightV ClientWidthQColor clBtnFace Font.CharsetDEFAULT_CHARSET Font.Color clWindowText Font.Heightõ Font.Name MS Sans Serif Font.Style OldCreateOrderOnCreate FormCreate PixelsPerInch` TextHeight TGroupBox GroupBox1LeftTop Width9HeightACaptionInformace o klientoviTabOrderTLabelLabel1LeftTop WidthHeight CaptionJmenoTLabelLabel2LeftTop@Width*Height Caption PrijemeniTLabelLabel3LeftTop`WidthHeight CaptionUliceTLabelLabel4LeftTop€WidthHeight CaptionMestoTLabelLabel5LeftTop WidthHeight CaptionPSCTLabelLabel6LeftTopÀWidth$Height CaptionTelefonTLabelRCLeftTopàWidthHeight CaptionRCTBitBtnBitBtn1Left0TopWidthKHeightCaptionOK ModalResultTabOrderOnClick BitBtn1ClickTBitBtnBitBtn2Left¸TopWidthKHeightCaptionZrusit ModalResultTabOrderTEdit Klient_jmenoLeftXTop WidthÑHeightTabOrderTEditKlient_prijmeniLeftXTop@WidthÑHeightTabOrderTEdit Klient_uliceLeftXTop`WidthÑHeightTabOrderTEdit Klient_mestoLeftXTop€WidthÑHeightTabOrderTEdit Klient_pscLeftXTop WidthÑHeightTabOrderTEditKlient_telefonLeftXTopÀWidthÑHeightTabOrderTEdit Klient_rcLeftXTopàWidthÑHeightTabOrder TDataSourceDataSource_klientDataSet Table_klientLeft Top)TTable Table_klient DatabaseNamebanka TableNameklientLeftTop)TQueryNKQuery DatabaseNamebanka SQL.Strings"SELECT max(klient_id) FROM klient LeftÀTop) TDataSource DataSourceNumDataSetNKQueryLeft Top)