{$MODE DELPHI}
Program testroute;
uses

procedure RegisterDateTimeLibrary_R(S: TPSExec);
begin
  S.RegisterDelphiFunction(@EncodeDate, 'ENCODEDATE', cdRegister);
  S.RegisterDelphiFunction(@EncodeTime, 'ENCODETIME', cdRegister);
  S.RegisterDelphiFunction(@TryEncodeDate, 'TRYENCODEDATE', cdRegister);

begin
  s.AddType('TDateTime', btDouble).ExportName := True;
  s.AddDelphiFunction('function EncodeDate(Year, Month, Day: Word): TDateTime;');
  s.AddDelphiFunction('function EncodeTime(Hour, Min, Sec, MSec: Word): TDateTime;');
  s.AddDelphiFunction('function TryEncodeDate(Year, Month, Day: Word; var Date: TDateTime): Boolean;');

(*==========================================================================;
 *
 *  DirectX 7.0 Delphi adaptation by Erik Unger
 *
 *  Download: http://www.delphi-jedi.org/DelphiGraphics/

(*==========================================================================;
 *
 *  DirectX 7.0 Delphi adaptation by Erik Unger
 *
 *  Download: http://www.delphi-jedi.org/DelphiGraphics/

interface
implementation
uses SysUtils, LinarBitmap, Streams, Graphics, DelphiStream;
resourcestring
  rsWindowsBitmap = 'Windows bitmap';

unit delphi_init_com;
interface
uses ActiveX;

{  JADD - Just Another DelphiDoc: Documentation from Delphi Source Code
Copyright (C) 2002-2008   Gerold Veith
This file is part of JADD - Just Another DelphiDoc.

procedure RegisterDateTimeLibrary_R(S: TIFPSExec);
begin
  S.RegisterDelphiFunction(@EncodeDate, 'ENCODEDATE', cdRegister);
  S.RegisterDelphiFunction(@EncodeTime, 'ENCODETIME', cdRegister);
  S.RegisterDelphiFunction(@TryEncodeDate, 'TRYENCODEDATE', cdRegister);

{$IFDEF DELPHI}
    Suck my dick, delphi-programmers ;-)
{$ENDIF}

(*
 RegQSMP3: Hack to allow Delphi 6 to register the QSMP3 Component
 Delphi 6 doesn't handle {$IFDEFS} as well as Kylix. Therefore,
 QSMP3 cannot register itself.

{  JADD - Just Another DelphiDoc: Documentation from Delphi Source Code
Copyright (C) 2002-2008   Gerold Veith
This file is part of JADD - Just Another DelphiDoc.

{ Secrets of Delphi 2, by Ray Lischner. (1996, Waite Group Press).
  Chapter 2: Components and Properties.
  Copyright � 1996 The Waite Group, Inc. }

{ Secrets of Delphi 2, by Ray Lischner. (1996, Waite Group Press).
  Chapter 2: Components and Properties.
  Copyright � 1996 The Waite Group, Inc. }

{*******************************************************}
{$I PHP.INC}
{ $Id: php4AppUnit.pas,v 7.0 04/2007 delphi32 Exp $ }
unit php4AppUnit;
interface

 BUSINESS CONSULTING
 s a i n t - p e t e r s b u r g
         Components Library for Borland Delphi 4.x, 5.x
         Copyright (c) 1998-2000 Alex'EM
}

{$MODE DELPHI}
unit utransaction;
interface

{$APPTYPE GUI}
{$MODE DELPHI}
program pdemo_showmessage;
uses tools,ugplapp;

{$MODE DELPHI}
unit udatabase;
interface

{$MODE DELPHI}
Program testping;
uses

implementation
uses
  // Delphi units
  Classes,
  // ComDrv32 units

implementation
uses
  // Delphi units
  Classes,
  // ComDrv32 units

implementation
uses
  // Delphi units
  Classes,
  // ComDrv32 units

implementation
uses
  // Delphi units
  Classes,
  // ComDrv32 units

implementation
uses
  // Delphi units
  Classes,
  // ComDrv32 units