Menüleiste

Cosmic · Beiträge: 63

Hallo

also so eine Menüleiste wie sie z.B. in Word ist ist ja echt praktisch!
Nur wie lauten die Kopieren, Ausschneiden, Einfügen, und Löschen Befehle?
Geht das überhaupt so einfach?
Ich will nur einen mit der Maus markierten Eintrag (egal was) kopieren , löschen etc. :-)

Weis jemand Rat?

Ciao Cosmic

-----------------------------------------
Let´s Fetz heute beginnt Dein Leben

Raphael O. · Beiträge: 1596 VS 2013

also das kopieren und einfügen geht so:

markieren

Quelltext

1:
2:
3:
4:

edit2.Text:='';
edit1.SelectAll;
edit1.CopyToClipboard;
edit2.pastefromclipboard;

Fiji-Fighter

Raphael O. · Beiträge: 1596 VS 2013

wenn du schon mit der maus markierst, dann kannste das selectall weglassen...

beim ausschneiden musst du einfsch noch edit1 löschen...

Fiji-Fighter

Cosmic · Beiträge: 63

Hi,
hmm ja das verstehe ich. Nur es gibt zuviele Editfelder, als dass das eine Möglichkeit wäre :-(

Man könnte ja auch ein label makieren und kopieren.....

ciao cosmic

------------------------------------------
Let´s Fetz heute beginnt Dein Leben

Ehemaliges Mitglied Erhaltene Danke: 1

Hast du schon mal probiert einen Text in einem Label zu markieren und zu löschen? :roll:

Desweiteren haben Edits das Menü schon von Haus aus. Rein theoretisch würden also gefakte Menüeinträge reichen, wenn man nur die Shortcuts braucht.

mimi · Beiträge: 3458 Ubuntu, Win XP Lazarus

wenn du zuviele Edit fehler hast mach es einfach so wie ich es machen würde:
nimm
FindComponent
dann sieht das so aus:

bei den Menueintrag schreibst du dann folgendes:

markieren

Quelltext

1:
2:
3:
4:

  for i:=0 to anzal der Edit komponenten then begin
    with TEdit(FindComponent('Edit' + IntToStr(i))) do
      .....
  end;

und fertig.
sollte funktioniren

_________________
MFG
Michael Springwald, "kann kein englisch...."

Ehemaliges Mitglied Erhaltene Danke: 1

Dann weiß er aber immer noch nicht, in welchem der Cursor steht, bzw. auf welches Edit die Befehle angewendet werden sollen.

mimi · Beiträge: 3458 Ubuntu, Win XP Lazarus

dann ermitel das aktuel Edit Fehld.
zum beispiel so:

var
AEdit:TEdit;
-------------------

bei allen OnClicks bei den Edit komponenten:

markieren

Quelltext

1:
2:

  with Sender as TEdit
    AEdit:=Name

du brauchst dann nur meinen ersten code ändern und fertig;)

_________________
MFG
Michael Springwald, "kann kein englisch...."

mimi · Beiträge: 3458 Ubuntu, Win XP Lazarus

oder du machst das so:
du speichst einfach nur den tag der aktuelllen komponenten aber dafür musst du allen edit komponentne tag hinzuweisen z.B so:

markieren

Quelltext

1:
2:
3:

  for i:=0 to anzal der edit kompos do 
    with TEdit(FindComponenten('Edit' + IntOTStr(i)) do
      tag:=i;

das würde auch noch gehen,
aber dann musst du bei allen onclicts denn tag abspeichern in einer Integer Variable.

_________________
MFG
Michael Springwald, "kann kein englisch...."

Cosmic · Beiträge: 63

Hi Leute!
Das geht doch irgendwie viel einfacher!
Denn ich kann den markeirten Text mit "STRG + C" kopieren etc.
also reichte ein Fake wie jemand schon meinte.
Also etwas, was den Befehl "STRG + C" ausführt, wenn ich den Menüeintrag
an klicke. Vorrausgesetzt das geht.

Ciao Cosmic
-----------------------------------------
Let´s Fetz heute beginnt Dein Leben

mimi · Beiträge: 3458 Ubuntu, Win XP Lazarus

also jede Edit komponenten unterstüzt sowas;)

_________________
MFG
Michael Springwald, "kann kein englisch...."

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme