Hiiiilfe bitte bin am verzweifeln bei der Zeichenkette

[ankaiscool]

Guten Abend,
im Anhang findet ihr meine Aufgabe...
ich weiß, das ich im Edit feld1 irgendwas mit "lengh" machen muss...
ich habe leider auch nichts explizites im Internet gefunden...
udn die Delphi HILFE funktioniert nicht, weil irgend ein Microsoft Docoment Explorer nicht am FH-PC Installiert sei...
ich bräuchte nur eine Website, auf der es gut erklärt ist, wie ich es der Aufgabe entsprechend Programiere und das möglichst auf Deutsch...

Vielen lieben Dank (falls ihr lust habt (ich bin mir sicher es sind nur 2 bis 3 klicks, wenn man weiß welche) könntet ihr mir auch gern den Quelltext hier einfügen)
ganz liebe Grüße Anka

[himitsu]

Wenn es wirklich nur an der fehlenden OH hängt, dann DP-Portal > Nachschlagewerke > Delphi-Referenz / Tutorials
Und natürlich Delphi Tutorial -> z.B. http://www.delphi-treff.de/tutorials...gen-tutorials/

[Captnemo]

https://www.google.de/search?q=delph...+eines+strings

Komm...so schwer isses ja nun nich.

Wenn du die richtige Schreibweise eines Befehls nicht weißt, dann such doch einfach mal auf deutsch. Führt auch oft zum Erfolg, oder zumindest zur richtigen Schreibweise.

[ankaiscool]

OH???

[ankaiscool]

so sieht das aus bei mir

[Sir Rufo]

Zitat:

Zitat von ankaiscool (Beitrag 1303935)

OH???

Ja, OH ... (wenn du mit dem Mauszeiger direkt auf OH gehst - nicht klicken nur drüber - dann wird das sogar erklärt => Online-Hilfe)

[Sir Rufo]

Zitat:

Zitat von ankaiscool (Beitrag 1303937)

so sieht das aus bei mir

Das sieht aus, als ob du einfach an die erst beste Stelle etwas hingeschrieben hast.

Hmmm, da fehlen die allerwichtigsten Grundlagen ... bitte nachholen, sonst erklären wir uns hier einen Wolf

PS Hier ist nicht das "MachtMalMeineHausaufgabenFürMich"-Forum, aber wir haben eine Sparte für Job-Angebote. Du entscheidest.

[ankaiscool]

Naja ich muss es bis Morgen irgendwie fertig haben...
ich glaub ich bezahl einfach jemanden an der Uni der das in vermutlich 5 min macht...
ich hab einfach keine Ahnung davon und brauch es dann auch nie wieder...
wir haben es nur leider nicht erklärt bekommen und deswegen habe ich keine ahnung davon... den anderen geht es nicht anders...

[Sir Rufo]

Kein Problem, viel Erfolg bei der Suche ...

[Popov]

In der Schule lernt man verschiedenes Zeug. Viele glauben, dass man in der Schule nur Zeugs lernt wie rechnen, Geschichte, Rechtschreibung, usw. Das stimmt auch, aber in der Schule lernt man auch fürs Leben (oder sollte man), wie z. B: wenn ich für eine Aufgabe eine Woche Zeit bekomme und bis zum letzten Tag damit warte, hab eich am letzten Tag kaum noch Zeit es zu lösen.

Ich denke, wenn du morgen zum Lehrer gehst und ihm sagst: ich habe die Aufgabe nicht gelöst, aber etwas anderes gelernt, wird er dir wegen der fehlenden Aufgabe zwar eine 6 geben, sich aber dennoch freuen dir etwas beigebracht zu haben. Vielleicht gibt er dir deswegen auch nur eine 5 :)

Mit der Funktion

Delphi-Quellcode:

Length()

kann man die Länge eines Strings ermitteln
Mit

Delphi-Quellcode:

Copy(Str, x, 1)

kann man ein Zeichen kopieren
Alternativ: Mit

Delphi-Quellcode:

Str[x]

kann man ein Zeichen erhalten

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  sText, sListePositionen: String;
  cGesuchtesZeichen: Char;
  iPosition, iLeangeText, iAnzahlZeichen: Integer;
begin
  sText := 'Fachhochschule Stralsund';
  sListePositionen := '';
  iAnzahlZeichen := 0;
  cGesuchtesZeichen := 'h';
  iLeangeText := ?????;
  for iPosition := 1 to iLeangeText do
  begin
    if sText[iPosition] = cGesuchtesZeichen then
    //Alternativ:
    //if Copy(sText, iPosition, 1) = cGesuchtesZeichen then
    begin
      Inc(iAnzahlZeichen);
      //Alternativ:
      //iAnzahlZeichen := iAnzahlZeichen + 1;
      if sListePositionen <> ????? then
      //Alternativ
      //if ????? = 0 then
        sListePositionen := sListePositionen + ', ';

      sListePositionen := sListePositionen + IntToStr(iPosition);
    end;
  end;

  ShowMessage('Text: ' + sText);
  ShowMessage('Gesuchtes Zeichen: ' + cGesuchtesZeichen);
  ShowMessage('Anzahl Textzeichen: ' + IntToStr(iLeangeText));
  ShowMessage('Anzahl gesuchte Zeichen: ' + IntToStr(iAnzahlZeichen));
  ShowMessage('Positionen der Zeichen: ' + sListePositionen);
end;

Hier eine mögliche Lösung. Es fehlen aber noch drei Angaben, schließlich ist es eine Hausaufgabe.