[GELÖST] Key (z.B 'A' ) per Button an ein Editfeld senden

[Klaus01]

Hallo,

wenn Du den Button (7) drückst - wird der den Focus haben.

Grüße
Klaus

[Dexo]

Zitat von Klaus01:

Hallo,

wenn Du den Button (7) drückst - wird der den Focus haben.

Grüße
Klaus

Mir geht es auch eigentlich eher um den Code

Wenn ich den Button drücke, soll er eine Zahl, also eine Taste von dem Keyboard, an das Editfeld senden (falls das überhaupt geht )... daran scheitere ich momentan

Trotzdem danke für deine Antwort

[Klaus01]

..meinst Du das in etwa so?

Delphi-Quellcode:

procedure TForm1.Button7Click(sender:TObject);
var
  tempStr: String:
begin
  tempStr := display.text;
  tempStr := concat(tempStr,'7');
  display.text := tempStr;
end;

Grüße
Klaus

[Dexo]

Zitat von Klaus01:

..meinst Du das in etwa so?

Delphi-Quellcode:

procedure Button7.click(sender:TObject);
var
  tempStr: String:
begin
  tempStr := display.text;
  tempStr := concat(tempStr,'7');
  display.text := tempStr;
end;

Grüße
Klaus

Ja sowas meine ich, allerdings erscheint dann die Nachricht
"Error: Identifier not found 'ConcatStr' "

[Klaus01]

Zitat von Dexo:

Ja sowas meine ich, allerdings erscheint dann die Nachricht
"Error: Identifier not found 'ConcatStr' "

Ich hatte den code zwischenzeitlich ausgebessert.
Grüße
Klaus

[DeddyH]

Wieso denn nicht einfach
display.Text := display.Text + '7'; ?

[Dexo]

Zitat von DeddyH:

Wieso denn nicht einfach
display.Text := display.Text + '7'; ?

Das habe ich auch schon gemacht, aber er soll ja die Zahl da hinschreiben, wo der Focus ist

Trotzdem Danke

[baumina]

SpeedButtons verwenden, das gibt keinen Fokus.

Edit1.SelText := '7';

[Nersgatt]

Du kannst das Zeichen ja einfach in das Feld schreiben:

Edit1.Text := '1';

[haentschman]

Hallo und willkommen hier...

Wie würdest du deinen bisherigen Kenntnisstand einschätzen? Weißt du was Events sind und wie man sie benutzt? Ich gebe dir mal die Lösung. Wenn du das nicht verstehst, frage einfach nach.

Lösung:
1. In der Entwurfsansicht Doppelklick auf den Button -> Der Editor öffnet sich mit einem vorgefertigtem Prozedurrumpf.
In etwa so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);

end;

2. Dort trägst du dann den Code ein der beim drücken des Buttons ausgeführt werden soll.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
  Edit1.Text:= '7';
end;

3. fertig.

HINWEIS:
Der Code ist, obwohl er funktioniert, nicht wirklich gut. Darstellung und Daten sind immer zu trennen. In Anbetracht deiner Signatur das nur als Hinweis.