Objekte Bewegen

[Finki]

ach ich dachte des wäre ein Fehler deinerseits, sry, ne dann meckert er(der Kompiler) rum, weil er ein TObject bekommen hat und ein TWinControl erwartet

[DeddyH]

Das verstehe ich nicht, habe hier aber auch kein Lazarus zur Verfügung. Ich könnte das höchstens zu Hause einmal ausprobieren, das wird aber vor heute Abend nichts.

[Finki]

Das wäre echt net. Ganz kurz noch, vielleicht kannst du mir was anderes beantworten.

und zwar arbeite ich gerade daran das man sieht wie viel zeichen man geschrieben hat.

Delphi-Quellcode:

StatusBar.Panels.Items[1].Text := Format('%d Zeichen', [Length(Memo1.Text)-(2*Memo1.Lines.Count)+1]); // 2*Anzahl der Zeillen weil der Umbruch Befehl als zwei Zeichen gezählt wird

das Problem ist das Sonderzeichen wie ß ü ö ä, usw. sind zwei Zeichen.

Gibt es einen "einfachen" Weg wie ich das vermeinden kann, also das sie als ein Zeichen gezählt werden?

[DeddyH]

Ehrlich gesagt verstehe ich Deinen ganzen Rechenweg nicht. Was ist denn mit WordWrap und solchen Dingen? Ich würde mir eher die Länge des Textes merken und später dann die aktuelle Textlänge mit der gemerkten vergleichen.

[Finki]

Was bitte genau ist des WordWrap, des hab ich immer noch nicht geschnallt (auch nach wiederholtem googlen).

[DeddyH]

Das ist der automatische Zeilenumbruch, d.h. die Zeile wird umgebrochen, wenn sie nicht mehr komplett im Memo darstellbar ist.

[Finki]

Achso ist das. und wie kann ich den Befehl ansprechen/zählen???

[DeddyH]

Was genau möchtest Du denn zählen? Ich habe das immer noch nicht ganz begriffen.

[Finki]

Egal, also das mit dem WordWrap, weil den Zeilen Umbruch hab ich ja in meiner normalen Rechnung schon abgezogen.

was ich zählen möchte: ich möchte die Zeichen in der Memo zählen

[DeddyH]

Dann ist Length(Memo.Text) doch korrekt.