www.pudn.com > Source.rar > StockAlert.dfm, change:2007-02-04,size:3402b
object StockenAlert: TStockenAlert Left = 53 Top = 114 Width = 707 Height = 385 Caption = 'Stock en Alert... ' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poMainFormCenter OnActivate = FormActivate PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 699 Height = 57 Align = alTop TabOrder = 0 object Label1: TLabel Left = 273 Top = 16 Width = 167 Height = 22 Alignment = taCenter Caption = 'STOCK EN ALERT ' Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False end object BitBtn2: TBitBtn Left = 597 Top = 16 Width = 75 Height = 25 Cancel = True Caption = 'Fermer' ModalResult = 2 TabOrder = 0 end end object ArticleGrid: TDBGrid Left = 0 Top = 57 Width = 699 Height = 294 Align = alClient DataSource = Article_S Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit] TabOrder = 1 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] Columns = < item Expanded = False FieldName = 'R'#233'f'#233'rence' Title.Alignment = taCenter Title.Font.Charset = DEFAULT_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -11 Title.Font.Name = 'MS Sans Serif' Title.Font.Style = [fsBold] Width = 71 Visible = True end item Expanded = False FieldName = 'Designation' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Arial' Font.Style = [fsBold] Title.Alignment = taCenter Title.Caption = 'D'#233'signation' Title.Font.Charset = DEFAULT_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -11 Title.Font.Name = 'MS Sans Serif' Title.Font.Style = [fsBold] Width = 364 Visible = True end item Alignment = taCenter Expanded = False FieldName = 'Stock_Reel' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] Title.Alignment = taCenter Title.Caption = 'Stock R'#233'el' Title.Font.Charset = DEFAULT_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -11 Title.Font.Name = 'MS Sans Serif' Title.Font.Style = [fsBold] Width = 119 Visible = True end> end object Article: TQuery DatabaseName = 'Gestion' SQL.Strings = ( 'Select * from Articles Where Qte_Mini >=Stock_Reel') Left = 160 Top = 120 end object Article_S: TDataSource DataSet = Article Left = 160 Top = 152 end end