Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi
    Delphi
    by MrSpock, 15. Jun 2002
  Hallo m-werk,
  
  ich habe die Procedure CheckCode zwar damals geschrieben, bin aber nicht mehr ganz sicher, wie der erste Parameter deklariert war. Ich glaube aber er ist ein String. Deshalb kannst du "serial" einfach pübergeben, ohne ihn in ein Integer umzuwandeln. Das gleiche gibt für a. In beiden Fällen kannst du StrToInt einfach weglassen.
• Forum: Sonstige Fragen zu Delphi
    Delphi
    by MrSpock, 14. Jun 2002
  Hallo m-werk,
  
  im finally Teil deines Codes willst du ja, falls a den Wert 0 hat einen Freischaltcode einlesen und nur, wenn er korrekt ist, diesen speichern und das Programm starten. :
  
  finally
  REG.Free;
  if a=0 then
  begin
  { Neuen Code einlesen }
  fCode := '';