Delphi-Tutorials.de

Anwendung nur einmal starten

Fri, 18 Sep 2026 00:00:00 +0000

Manche Programme dürfen nur einmal laufen – etwa weil sie eine Datei exklusiv öffnen. Windows bietet dafür einen benannten Mutex: Die erste Instanz legt ihn an, jede weitere stellt fest, dass es ihn schon gibt.

Das Prinzip

CreateMutex liefert auch dann ein gültiges Handle, wenn der Mutex bereits existiert. Ob man der Erste war, verrät erst GetLastError – und zwar nur, wenn man es unmittelbar danach abfragt.

Der Code in der .dpr

program Projekt1;

uses
  Winapi.Windows,
  System.SysUtils,
  Vcl.Forms,
  Main in 'Main.pas' {FormMain};

{$R *.res}

var
  MutexHandle: THandle;

begin
  // Name eindeutig wählen – sonst blockiert ein fremdes Programm
  MutexHandle := CreateMutex(nil, True, 'DelphiTutorials.Projekt1.EinzigeInstanz');
  if MutexHandle = 0 then
    RaiseLastOSError;
  if GetLastError = ERROR_ALREADY_EXISTS then
  begin
    CloseHandle(MutexHandle);
    Exit;
  end;
  try
    Application.Initialize;
    Application.MainFormOnTaskbar := True;
    Application.CreateForm(TFormMain, FormMain);
    Application.Run;
  finally
    CloseHandle(MutexHandle);
  end;
end.

Tipp: Statt still zu beenden, kann die zweite Instanz die erste per FindWindow suchen und in den Vordergrund holen.

Interessante Projekte

Fri, 18 Sep 2026 00:00:00 +0000

2 Projekte auf die ein Blick lohnt: DelphiRefactoringLight und AppCentral

Neustart: Die Seite ist jetzt statisch

Fri, 18 Sep 2026 00:00:00 +0000

Kein Drupal mehr, keine Update-Runden: delphi-tutorials.de besteht ab heute aus schlichten HTML-Seiten.

BLOBs in Firebird

Sun, 16 Sep 2018 00:00:00 +0000

Wer Texte, Bilder oder sonstige Daten in einer Interbas/Firebird (IB/FB) Datenbank speichern will, verwendet daszu den Typ Blob. Doch was sind Blobs, wie funktionieren sie und wo kommen sie überhaupt her? Geschichte der Blobs Der Name "Blob" bedeutet im Grunde genommen gar nichts. Oft wird das Wort Blob als Abkürzung für „Binary Large Object“ oder "Basic Large Object" angesehen. Richtig ist aber, dass die Bezeichnung aus dem amerikanischen Science Fiction Spielfilm "The Blob" stammt. Der Hauptdarsteller (The Blob) war ein außerirdisches Monster das große Teile der USA verschlag. So in der Art stellten sich wohl auch die Väter des Blob Types die Funktion vor: Alles Mögliche in sich reinstopfen... Der Sub_type Jeder der schon mal mit Blobs gearbeitetet hat, weiß, dass er bei der Definition eines Blobfeldes einen Sub_Type angeben muss. Es existieren eine handvoll definierter Sub_types:

Datenbank-Grundlagen

Sun, 16 Sep 2018 00:00:00 +0000

In diesem Tutorial geht es ausschließlich um Datenbanken. Was ist das, wie funktioniert das und was kann man damit machen. Hier werde ich Grundlagen erläutern - von der Idee bis zur fertigen Datenbank. Die SQL-Grundlagen sowie weiterführende SQL-Techniken für den IB/FB-Server gibt's in meinem SQL-Tutorial. Historisches Der Begriff "Datenbank" ist nur schwer zu definieren, da umgangssprachlich alles mögliche mit diesem Begriff in Verbindung gebracht wird - vom Datenbankmanagementsystem (DBMS), den Datenbankfiles bis hin zu Paradox. Auf die genaue Bedeutung der eben genannten Begriffe werde ich später eingehen. Die ersten "Datenbanken" waren File-Systeme in denen die Datensätze nacheinander (sequentiell) abgespeichert wurden. Wollte man also den 20. Datensatz lesen, musste z.B. das Band zum Anfang der Datensätze (begin of file BOF) gespult werden und dann jeder einzelnen Datensatz eingelesen werden, bis man beim 20sten angekommen war. Oft wird auch eine "Datenbank" als großer Speicherraum für irgendwelche Daten missverstanden. Daten können auch in Textdateien auf der Festplatte gespeichert werden, was sicherlich keine Datenbank darstellt. Die Datenbank (oder besser das DBMS) ist dafür verantwortlich die Daten schnell wieder zu finden und das kann in einem Textfile mitunter schwierig werden. Definitionen Datenbankmanagementsystem (DBMS) Das DBMS ist das Programm, das für den Zugriff auf die DB-Files, in denen die einzelnen Daten gespeichert sind, zuständig ist. DBMS gibt es in verschiedene Ausführungen:

MS Office Automation

Sun, 16 Sep 2018 00:00:00 +0000

Wer Delphi 5 (oder neuer) sein Eigen nennt, kann damit sehr einfach und schnell das komplette Office fernsteuern, angefangen vom Starten der Applikationen bis hin zu Aufrufen verschiedener Funktionen.

Word - Die erste Anwendung

In eine neue Anwendung werden zwei TButtons sowie eine TWordApplication hinzugefügt, der erste bekommt die Caption "Starten" und der andere "Beenden". Die Eigenschaft FormStyle des Formulars wird auf "fsStayOnTop" gesetzt. In die Ereignisroutine OnClick der Buttons kommt folgender Code: Button Starten:

OOP in Delphi

Sun, 16 Sep 2018 00:00:00 +0000

Jeder, der das obligatorische "Hello World" Programm in Delphi erstellt hat, ist schon mit Klassen und Objekten in Berührung gekommen, er hat schon objektorientiert programmiert. Im folgenden Tutorial werde ich die Grundlagen von OOP erläutern und dabei auf die Besonderheiten von Delphi eingehen. Als Abschluss kommt dann ein kleines Beispielprojekt.

Klasse und Objekt - alles das selbe oder doch nicht? Und was ist eine Instanz?

Oft wird der Begriff "Klasse" und "Objekt" verwechselt bzw. missverstanden. Zwischen beiden besteht ein großer Unterschied, dieser ist aber sehr einfach zu merken: Das Verhältnis Klasse zu Objekt ist identisch wie das Verhältnis zwischen Variablentyp und Variable (also z.B. Integer und Variable i). Der Begriff Instanz ist gleichbedeutend mit dem Objekt. Also ist mit einer Instanz einer Klasse ein Objekt gemeint.

Listen in Delphi

Mon, 27 Aug 2018 00:00:00 +0000

Dieses Tutorial beschäftigt sich mit Listen in Delphi. Schon jeder, der ein Programm in Delphi geschrieben hat, hat auch mit Listen gearbeitet, aber nicht jeder hat es bemerkt. Es gibt einige Listenklassen in Delphi, hier eine kleine Übersicht:

TList Eine Zeigerliste
TThreadList Eine thread-sichere Zeigerliste
TBucketList Eine Zeigerliste, als Hash-Liste organisiert
TObjectBucketList Eine Liste von Objektinstanzen, als Hash-Liste organisiert
TObjectList Eine speicherverwaltete Liste von Objektinstanzen
TComponentList Eine speicherverwaltete Liste von Komponenten (d.h. Instanzen von Klassen, die sich von TComponent ableiten)
TClassList Eine Liste von Klassentypen
TInterfaceList Eine Liste mit Schnittstellenzeigern
TQueue Eine FIFO-Liste von Zeigern
TStack Eine LIFO-Liste von Zeigern
TObjectQueue Eine FIFO-Liste von Objekten
TObjectStack Eine LIFO-Liste von Objekten
TCollection Basisklasse für viele spezielle Klassen mit typisierten Elementen
TStringList Eine Stringliste
THashedStringList Eine Stringliste der Form Name=Wert, als Hash-Liste organisiert

Die bekannteste von diese Listen dürfte wohl die TStringList sein. Die Eigenschaft „Text“ eines Memofeldes ist nämlich vom Typ TStringList. Daneben gibt es aber noch eine Menge weiterer Insteressanter Listen. Hier in diesem Tutorial werde ich auf folgende Listenklassen eingehen: