Forum: Programmieren allgemein
by Lisa.99,
6. Mär 2017
text := Trim('Dies ist ein kurzer Text')
Was hat das in den Klammern zu stehende zu bedeuten?
Verstanden habe ich, dass das Trim die Leerzeichen am Satzanfang und -ende verfallen lässt.
Forum: Programmieren allgemein
by Lisa.99,
6. Mär 2017
Ich habe mir alle angesehen, nur leider verstehe ich die wenigsten und möchte gerne die Lösungen nutzen, die ich auch nachvollziehen kann. Vieles haben wir nämlich in der Schule nicht gelernt.
Forum: Programmieren allgemein
by Lisa.99,
6. Mär 2017
verstanden habe ich, was mein Fehler war, nur leider funktioniert es immer noch nicht, entweder er gibt mir 0 oder 1 aus.
Forum: Programmieren allgemein
by Lisa.99,
6. Mär 2017
Bei mir zählt er leider immer nur zwei Wörter, egal wie viele es sind und finde dabei den Fehler auch nicht
procedure TForm1.Button2Click(Sender: TObject);
var i, woerter : integer;
text : string;
begin
woerter:= 1;
for i := 0 to length (text) do
begin
inc(woerter);
Forum: Programmieren allgemein
by Lisa.99,
27. Feb 2017
Danke für die Hilfe!
Ich schaue, was ich daraus machen kann :-D
Forum: Programmieren allgemein
by Lisa.99,
27. Feb 2017
procedure TForm1.Button2Click(Sender: TObject);
var i, woerter : integer;
text : string;
begin
woerter:= 1;
for i := 0 to length (text) do
begin
inc(woerter);
continue;
end;
Forum: Programmieren allgemein
by Lisa.99,
27. Feb 2017
Hallo Zusammen!
Ich wollte mein Programm Wörter zählen lassen. Nur leider weiß ich nicht, wie ich das anstellen soll.
Ganz grob gedacht, muss er ja nach jedem Leerzeichen die Gesamtzahl mit 1 addieren, aber wie sieht das im Quelltext aus?
Danke schon mal für die Hilfe :)