Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  Re: Codierung

   
    by DeddyH, 18. Apr 2010
  Du musst schon versuchen zu verstehen, was wir hier posten. Mach das "end;" mal wieder rein, dann steht die Funktion wieder geschlossen für sich.function ErsteFunktion(const Wort: string): string;
  var ...
  begin
  //Code der Funktion
  end;
  
  procedure TForm1.ErsezungButtonClick(Sender: TObject);
  var Wort: string; //diese Variable Wort hat nichts mit dem Parameter in obiger Funktion zu tun...
• Forum: Programmieren allgemein

  Re: Codierung

   
    by DeddyH, 18. Apr 2010
  Das ist ein Platzhalter für den Quelltext, der dazwischen steht, für uns hier aber nicht relevant ist.
• Forum: Programmieren allgemein

  Re: Codierung

   
    by DeddyH, 18. Apr 2010
  function ErsteFunktion(const Wort: string): string; //Ergebnistyp ist String
  var i, Nummer: integer;
  Zeichen: char;
  begin
  Result := ''; //Ergebnis initialisieren
  for i := 1 to length(Wort) do
  begin
  Zeichen:=Wort;
  Nummer:=Ord(Zeichen);
  Nummer:=Nummer+3;
• Forum: Programmieren allgemein

  Re: Codierung

   
    by DeddyH, 18. Apr 2010
  Du hast 3 Checkboxen für 3 verschiedene Verfahren (sofern ich den unformatierten Code richtig überflogen habe). Nun musst Du doch das, was dort jeweils passieren soll, nur in eigene Routinen auslagern, die jeweils den Originalstring entgegennehmen, umwandeln und dann zurückgeben. Diese Routinen rufst Du dann auf (siehe mein Beispiel oben).
• Forum: Programmieren allgemein

  Re: Codierung

   
    by DeddyH, 18. Apr 2010
  Willkommen in der DP :dp:
  Ich vermute einmal, dass mit Unterprogrammen Routinen (also Prozeduren und Funktionen) gemeint sind. Falls ja, sieht das im Grobkonzept dann beispielsweise so aus:
  function MachWas(c: char): char;
  begin
  //Mache irgend etwas mit c und gib das Ergebnis zurück
  end;
  
  function TDeinForm.Konvertieren(const s: string): string;
  var i: integer;
  begin