Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  Re: RaiseException abfangen

    Delphi
    by Flocke, 12. Aug 2005
  Mache ich gleich, dauert aber noch einen Moment, mein Delphi ist mir gerade (mal wieder) abgeschmiert...
  
  So, stimmt, ohne SysUtils schmiert er ab - IDE ist direkt beendet, Kommandozeile kommt
  Hier sind wir!
  Runtime error 255 at 7C81EB33
  Soweit bist du aber wohl schon.
  
  @Olli: XP Prof. SP 2, hab' aber div. VMs, mit denen ich das noch ausprobieren könnte.
• Forum: Win32/Win64 API (native code)

  Re: RaiseException abfangen

    Delphi
    by Flocke, 12. Aug 2005
  Ich hatte gerade noch zwei Zeilen mehr geschrieben, ansonsten ist's aber identisch:
  program cmdLine;
  
  {$APPTYPE CONSOLE}
  
  uses
  SysUtils, Windows;
  
  begin
  { TODO -oUser -cConsole Main : Hier Code einfügen }
• Forum: Win32/Win64 API (native code)

  Re: RaiseException abfangen

    Delphi
    by Flocke, 12. Aug 2005
  Kommandozeile geht bei mir auch
  try
  RaiseException($C0000003, 0, 0, nil);
  except
  writeln('Exception gefangen');
  end;
  Alles mit Delphi 2005 Prof.
• Forum: Win32/Win64 API (native code)

  Re: RaiseException abfangen

    Delphi
    by Flocke, 12. Aug 2005
  Hmmm :gruebel:
  Das geht bei mir auch in einer nonVCL-Anwendung!
  try
  RaiseException($C0000003, 0, 0, nil);
  except
  MessageBox(Handle, 'Exception gefangen', 'Info', MB_ICONINFORMATION or MB_OK);
  end;
  
  
  Achso: Kommandozeile :stupid: Muss ich noch mal ausprobieren...
• Forum: Win32/Win64 API (native code)

  Re: RaiseException abfangen

    Delphi
    by Flocke, 12. Aug 2005
  Nö, muss man nicht. Wenn man überhaupt kein on ... angibt, dann werden alle Exceptions abgefangen.
  
  
  
  try
  RaiseException($C0000003, 0, 0, nil);
  except
  MessageDlg('Exception gefangen', mtInformation, , 0);
  end;
  geht bei mir, da kriege ich den Info-Dialog.