Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: If Anweisung... Block?

    Delphi
    by GanjaGott, 12. Dez 2006
  danke, hab den quelltext jetzt nochmal editiert, aber wie kann ich das jetzt mit dem repeat machen? könnte mir es vielleicht mal jemand in den quellcode einfügen sowie es sein muss? danke im voraus :)
  
  program Vendetta;
  
  {$APPTYPE CONSOLE}
  
  uses
  SysUtils;
  
  var
• Forum: Object-Pascal / Delphi-Language

  Re: If Anweisung... Block?

    Delphi
    by GanjaGott, 12. Dez 2006
  Habe das jetzt mal probiert wie es inherited gesagt hat, hier ist mein kompletter quellcode... allerdings funkz das prog jetzt nicht mehr da er jetzt am ende immer 0 hinschreibt... Was kann ich dagegen machen und wie würde das mit dem repeat innerhalb dieses quellcodes aussehen?
  
  program Einheiten;
  
  {$APPTYPE CONSOLE}
  
  uses
  SysUtils;
  
  var
• Forum: Object-Pascal / Delphi-Language

  Re: If Anweisung... Block?

    Delphi
    by GanjaGott, 12. Dez 2006
  if ein = 'Profikiller' then pun:=anz*176;
  if ein = 'Objektwache' then pun:=anz*21;
  if ein = 'Guarde' then pun:=anz*388;
  if ein = 'Problemloeser' then pun:=anz*93;
  if ein = 'Bombenleger' then pun:=anz*281;
  writeln;
  writeln;
  writeln ('Hier die Gesamtpunktzahl:');
  writeln (pun);
  da will ich jetzt ne else anweisung einbauen und dann unten nochmals eine abfrage...
• Forum: Object-Pascal / Delphi-Language

  If Anweisung... Block?

    Delphi
    by GanjaGott, 12. Dez 2006
  Hallo Leute,
  Ich habe gerade in kleines Programm geschrieben, nun ist meine Frage wie man eine If Anweisung blocken kann?
  Also ich hab mehrere If Anweisungen und möchte die so zusammen schachteln das wenn ich eine else anweisung einbaue er alle if anweisung durch geht und nicht nur die letzte! Hättet ihr da Tipps für mich? mit einer schleife vielleicht?
  
  meine 2. frage wäre dann gewesen, wie...