Edit1 Buchstaben

ECO · Beiträge: 18 D7 Personal

Hallo Zusammen!
Ich habe folgendes Problem.
Es ist ein Edit1 da sollten Zeichen (Buchstaben) drin stehen.
Aber der User weiß nicht wie viel.
Wenn er nur 3 ein gibt wie kann ich es anstellen das der rest meinetwegen 10 mit 'A' aufgefüllt wird.
Im speicher nicht sichtbar für den User.
Kann mir jemand Helfen.
Danke im vorauß
ECO

Kroni · Beiträge: 720 Win 98, Win ME, Win2k, Win XP D3 Pro

Soll dann auch der Rest dann auch in dem Edit angezeigt werden oder wie soll das sein?
Und welche länge sollte dann die gesamte Zeichenkette haben?
Aber normal gibst du dann halt an, wie lang die Zeichenkette sein soll, merkst dir die Länge der eingabe, und dann fügst du von länge der Zeichenkette bis zu der Länge, die die Zeichenkette haben soll, das von dir gewählte Zeichen hinzu, meinetwegen das A....
Mir ist noch nicht ganz klar, was du vor hast!
Gruß, Kroni.
PS Kannst mich auch in ICQ oder sowas adden...dann kann man das besser erklären*g*

Karlson · Beiträge: 2088

Mir gehts da ähnlich wie Kroni, aber wenn du es auf Kronis Methode machen willst musst du folgende Begriffe kennen.

Add und Length:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:

begin
 if length(edit1.text) < 10 then
  begin
    while length(edit1.text) <> 10 do
      begin
        edit1.text := edit1.text + 'A';
      end;
   end;
end;

So müsste deine Proz. aussehen. Aber was meinst du mit Speicher und für den User nicht sichtbar?

Kroni · Beiträge: 720 Win 98, Win ME, Win2k, Win XP D3 Pro

naja, das kann man aber nicht in die Edit1.change prozedur einbauen, weil sonst die ganzen AAAAs da nach dem ersten Buchstaben eingebaut werden.....und anschließend da noch stehen, nachdem man einen zweiten Buchstaben eingegeben hat....

.Chef · Beiträge: 1112

Im OnExit vom Edit machst du einfach das hier:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

var
  s : string;
begin
  s:=Edit1.Text;
  while Length(s) < 10 do s:=s+'A';
  //s hier noch speichern oder sonstwie für spätere Verwendung verarbeiten

Gruß,
Jörg

_________________
Die Antworten auf die 5 häufigsten Fragen:
1. Copy(), Pos(), Length() --- 2. DoubleBuffered:=True; --- 3. Application.ProcessMessages bzw. TThread --- 4. ShellExecute() --- 5. Keine Vergleiche von Real-Typen mit "="!

Kroni · Beiträge: 720 Win 98, Win ME, Win2k, Win XP D3 Pro

na ja....ok wenn ich das bräuchte, wäre ich auch nicht zu frieden, weil ich jedes mal die AAAA.wegmachen müsste, bevor ich was neues eingeben würdee...aber dann würde ich nicht so etwas benutzten sondernein formatiertes Eingabefeld, oder??

ECO · Beiträge: 18 D7 Personal

Die code von .Chef war für mein Projeckt der richtige.
Danke an alle
ECO

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme