1. Aufruf des Programms

[Christian Seehase]

Moin Trouble Maker,

schreib's doch so:

Delphi-Quellcode:

// Was vorher noch passieren muss/soll
//...

// Prüfen ob erster Aufruf
if not regist.ValueExists('1Aufruf') then begin
  // Wenn nicht, dann Meldung zeigen, und
  // Wert schreiben, der ein erneutes Verzweigen in diesen
  // Pfad unterbindet
  regist.WriteInteger('1Aufruf', 1); 
end;

//...
// Und hier, was sonst noch alles im OnCreate passieren soll

Beim nächsten Programmstart existiert der Wert und die Meldung wird nicht mehr angezeigt.