чтобы вы добавили в эту програмку?

Germany.ru → Foren → Архив Досок→ Programmierung

чтобы вы добавили в эту програмку?

376 1 2 alle

Mmmaloy свой человек01.12.06 07:24

NEW 01.12.06 07:24

in Antwort Chipolino 30.11.06 18:56

А... значит ты как в матрице смотришь на исходники и сразу видишь что там такое

object ZeitRaum_Frm: TZeitRaum_Frm
  Left = 693
  Top = 180
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'Minuten-Rechner'
  ClientHeight = 266
  ClientWidth = 190
  Color = clBtnFace
  Constraints.MaxWidth = 198
  Constraints.MinHeight = 150
  Constraints.MinWidth = 198
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnCreate = FormCreate
  DesignSize = (
    190
    266)
  PixelsPerInch = 96
  TextHeight = 13
  object StringGrid1: TStringGrid
    Left = 4
    Top = 36
    Width = 181
    Height = 186
    Anchors = [akLeft, akTop, akBottom]
    ColCount = 3
    Ctl3D = False
    DefaultColWidth = 50
    DefaultRowHeight = 18
    FixedCols =
 0
    RowCount = 2
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goEditing, goTabs]
    ParentCtl3D = False
    ScrollBars = ssVertical
    TabOrder = 4
    OnDrawCell = StringGrid1DrawCell
    OnGetEditMask = StringGrid1GetEditMask
    OnKeyDown = StringGrid1KeyDown
    OnKeyPress = StringGrid1KeyPress
    OnSelectCell = StringGrid1SelectCell
    OnSetEditText = StringGrid1SetEditText
  end
  object BitBtn1: TBitBtn
    Left = 4
    Top = 4
    Width = 25
    Height = 25
    Hint = 'Inhalte l'#246'schen'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    OnClick = BitBtn1Click
    Glyph.Data = {
      C6020000424DC602000000000000C60100002800000010000000100000000100
      08000000000000010000120B0000120B0000640000006400000000000000FFFF
      FF00FF00FF000086000000830000007B0000005E0000005C0000005800000054
      00000182020000650100005D010004880700068C0900048A0B00035A06000796
      0D0006630900046D0A00068E0F000CA015000C9D150008690E000B891300096D
      110011AA1D000D8217000E78180001500A001CB62F0013872300179928001890
      290021C239001C9A31001C982F0036E554002AD149002BCE49002CD44D000E91
      2D0035E05D0025AC460047F779001DA657000B63440012805B002D919700185F
      69003EABEE0045B4F70048B7FA00196DA3003DAAF400258BD80039A4F4003BA7
      F80040ACFE0041ADFA00025291000354950004579A00065B9F00197ACC001F81
      D4002581CE00319CF700359EF2003CA6FF000458A000065BAA00075CA9000962
      B4001676CA001E80D500268BE5002687DD002889E3002C8FEB002D95EF0038A1
      FF0038A3FF000C67C4000B64BB000F69BF002184E300278CEB000F6AC900126E
      D300116CCF001B6DC4002380E100136FDC001160C0001573E7001574E0001776
      E6001877EA00166AD40002020202020202626002020202020202020202020202
      615F5D5958020202020202020202024A4C57565A535449480202020202020237
      32334D364B5547463E3D020202021D43385B344D3B3941403F3C0202022E311D
      63425E4E3A44454550020202122B1E1E1E1D1D355C4F525102020219232C251E
      292F1E1E1D1D020202020224212A22150304142D300202020202020210201A0A
      050F0C0C02020202020202021F260D070C130202020202020202021C280E0902
      02020202020202020202172711080202020202020202020202021B1606020202
      02020202020202020202180B0202020202020202020202020202020202020202
      02020202020202020202}
    Layout = blGlyphTop
  end
  object BitBtn2: TBitBtn
    Left = 40
    Top = 4
    Width = 25
    Height = 25
    Hint
 = 'Zellen l'#246'schen'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    OnClick = BitBtn2Click
    Glyph.Data = {
      26020000424D2602000000000000260100002800000010000000100000000100
      08000000000000010000120B0000120B00003C0000003C00000000000000FFFF
      FF00FF00FF00015603000C971700109F1F001EB134002EC64D0037CF5A0050EB
      7F005BF7910