1. Liebe Forumsgemeinde,

    aufgrund der Bestimmungen, die sich aus der DSGVO ergeben, müssten umfangreiche Anpassungen am Forum vorgenommen werden, die sich für uns nicht wirtschaftlich abbilden lassen. Daher haben wir uns entschlossen, das Forum in seiner aktuellen Form zu archivieren und online bereit zu stellen, jedoch keine Neuanmeldungen oder neuen Kommentare mehr zuzulassen. So ist sichergestellt, dass das gesammelte Wissen nicht verloren geht, und wir die Seite dennoch DSGVO-konform zur Verfügung stellen können.
    Dies wird in den nächsten Tagen umgesetzt.

    Ich danke allen, die sich in den letzten Jahren für Hilfesuchende und auch für das Forum selbst engagiert haben. Ich bin weiterhin für euch erreichbar unter tti(bei)pcwelt.de.
    Dismiss Notice

DevPascal Buttons mit versch. Anweisungen

Discussion in 'Programmieren' started by schwarzm, Mar 29, 2005.

Thread Status:
Not open for further replies.
  1. schwarzm

    schwarzm Viertel Gigabyte

    Hilfe!!!

    Bitte helft mir bei DevPascal!

    Ich habe hier mal einen Code:

    program Untitled;
    {$APPTYPE GUI}
    {$MODE DELPHI}
    uses Windows;

    begin
    MessageBox (0, 'Zeile 1. hier steht was' , 'Dies ist der Titel', 0 + MB_OKCANCEL + MB_ICONHAND);
    MessageBox (0, 'hier steht dann auch noch was' , '2. Text', 0 + MB_ICONEXCLAMATION);
    end.

    Wie kann ich es anstellen, dass wenn ich auf Abbrechen klicke das Programm beendet wird und bei OK zur nächsten Messagebox komme?
    :was:
    Vielen Dank schon mal!

    Gruß
    schwarzm
     
    schwarzm, Mar 29, 2005
    #1
  2. Michi0815

    Michi0815 Guest

    schau mal hier:
    http://msdn.microsoft.com/library/d...oxreference/dialogboxfunctions/messagebox.asp
    im msdn ist das userinterface von windows recht gut beschreiben. nachdem die MessageBox nichts anderes ist als eine extern aufgerufene windows-gdi-funktion, kannst du alle infos die im msdn stehen 1:1 verwenden.

    in dem fall kannst du den rückgabewert abfragen:

    if MessageBox (0, 'Zeile 1. hier steht was' , 'Dies ist der Titel', 0 + MB_OKCANCEL + MB_ICONHAND) = IDCANCEL then
    halt(0);
     
    Michi0815, Mar 29, 2005
    #2
  3. schwarzm

    schwarzm Viertel Gigabyte

    Danke für deine Antwort!
    Auch wenn ich dich jetzt schon das zweite Mal frage ;)

    Aber der Eintieg in eine neue Prog Sprache fällt mir immer ein bisschen schwer!
     
    schwarzm, Mar 29, 2005
    #3
Thread Status:
Not open for further replies.

Share This Page