Quellcode-Bibliothek

^© Kompilation durch diese Firma

[Weder Korrektheit noch Funktionsfähigkeit der Software werden zugesichert.]

Datei: Sprache: Delphi

program Agenda13;

uses
  Forms, Windows, Dialogs,
  Utilities in 'Utilities.pas',
  Feedback in 'Feedback.pas' {Feedform},
  reabout in 'reabout.pas'   {AboutBox},
  reAlert in 'reAlert.pas'   {AlertBox},
  reEditor in 'reEditor.pas' {Editor},
  reLang in 'reLang.pas'     {LangBox},
  reAgenda in 'reAgenda.pas' {MainForm1},
  reOption in 'reOption.pas' {OptionBox},
  reSounds in 'reSounds.pas' {SoundsBox},
  reSpeech in 'reSpeech.pas' {SpeechBox},
  reSplash in 'reSplash.pas' {SplashForm},
  reThreads in 'reThreads.pas',
  reThreads2 in 'reThreads2.pas',
  reThreads3 in 'reThreads3.pas',
  DBAccess in 'DBAccess.pas',
  MailData in 'MailData.pas' {MailForm},
  SpeechLib_TLB in '..\..\..\externer Code Agenda und Columbo\Speech Delphi 7 package\SpeechLib_TLB.pas';

{$R *.res}
var
  Mutex : THandle;
begin
  Mutex := CreateMutex(nil, False, PChar(AppName));
  if (Mutex = 0) OR (GetLastError = ERROR_ALREADY_EXISTS) then
  begin
    ShowMessage(' :-( ');
  end else  begin
    Application.Initialize;
    Application.Title    := 'Agenda';
    Application.HelpFile := 'agenda.hlp';
    Application.CreateForm(TMainForm1, MainForm1);
    Application.Run;
  end;
  MainForm1.Free;
  ExitProcess(0);
  //TerminateProcess(0,0);
end.

¤ Dauer der Verarbeitung: 0.22 Sekunden (vorverarbeitet) ¤

Download des Quellennavigators
Download des sprechenden Kalenders
in der Quellcodebibliothek suchen

Haftungshinweis

Die Informationen auf dieser Webseite wurden nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit, noch Qualität der bereit gestellten Informationen zugesichert.

Bemerkung:

Die farbliche Syntaxdarstellung ist noch experimentell.