runonceu.dfm

Delphi Win32核心API参考光盘源码 本书包含了常用的Windows API函数

object Form1: TForm1
  Left = 193
  Top = 103
  BorderStyle = bsDialog
  Caption = 'Run Once Example'
  ClientHeight = 62
  ClientWidth = 328
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 16
    Width = 291
    Height = 26
    Caption = 
      'This application can only be started once. Try starting another ' +
      'instance of this application.'
    WordWrap = True
  end
end