IsModified

[SpEEDY]

Hallo Forum,

muss euch mal wider nerven. Es geht diesmal um dem Befehl IsModified bei einem Textfeld.
Ich wollte diesen einbauen um herauszufinden ob ein Textfeld geändert worden ist.

Weiß aber nicht genau wo ich das ein bauen muss. Habe auch nicht in den Samplers gefunden.

Habe es einfach mal so probiert

Code (autolisp) Select Expand

(setq aaa (dcl_TextBox_IsModified BGR-Tool_FB_LINIE_TXLIST))


Bringt aber leider nicht.   :P

Vielleicht kann mit jemand helfen.

Danke im voraus.

SpEEDY

[Fred Tomke]

Hm, ich habe bisher nicht mit IsModified gearbeitet, sondern immer die Events OnEditChanged, OnKillFocus und/oder OnReturnPressed abgefangen.

Ich müsste mir mal ein Beipiel machen, wo ich das teste. Dazu kann ich aber erst heute abend was sagen, weil ich grad in einer Anwenderschulung bin.

VG, Fred

[Fred Tomke]

Hi, SpEEDY, welch glückliches Händchen du doch hast... IsModified gibt (leider) immer nil zurück. Habe ein Bug-Report angelegt. Wie gesagt, mir ist es nie aufgefallen, weil ich es noch nie verwendet hab. Was natürlich keine Entschuldigung ist.

Fred

[Fred Tomke]

Hallo, ich ziehe meine Behauptung zurück und behaupte das Gegenteil: es scheint keinen Bug zu geben. Genaugenommen habe ich aber auch nicht die Funktionsweise verstanden. Hier wäre es ganz nett, wenn mir das jemand erklären könnte:

Quelle

Note that IsModified returns T only while interactive editing is in progress (and Undo is available).

In welchem Fall funktioniert es also?

Fred

[Fred Tomke]

Hi, ich habs fast. Teste mal beiliegendes Beispiel. Allerdings habe ich das mit dem Undo nicht ganz verstanden. Kann mir das jemand erklären?

Fred

[SpEEDY]

Hi, Fred.
Ich habe gerade mit dein Testprojekt angeschaut. Und muss sagen ich habe mit den befehl: IsModified entwas anders vorgestellt.
Ich dachte der Befehl wird erst ausgelöst wenn tatsächlich der Wert sich ändert.
Z. B. Test -> Test1
Was passiert aber wenn ich den Text erst Text Löschen und dann wieder den Gleichen schreib.
Z. B. Test -> ââ,¬Å¾Ã¢â,¬Å" -> Test

Den sonst ist der Befehl ÃÅ"berflüssig.
Den das was du in der Lisp datei geschrieben hast geht auch so.

Code (autolisp) Select Expand


(defun c:prj_dlg_edt_OnEditChanged (strNewValue /)
    (dcl_Control_SetCaption prj_dlg_Bezeichnung2 "X")
)


Ich sehe da keinen Unterschied. Korrigiere mich wenn ich falsch liege.

Mit freundlichen Grüßen

SpEEDY

[Fred Tomke]

Ja, das ist das, was ich mit dem Undo noch nicht verstanden habe.
Fred

[SpEEDY]

Dann sind wir schon zu zweit die im Dunkeln tappen.   ;D

Werde es weiter Probieren vielleicht finde ich es heraus.   :P

Mit freundlichen Grüßen

SpEEDY

[Fred Tomke]

Hi,

Werde es weiter Probieren vielleicht finde ich es heraus.   :P

ich bin heute noch in Attendorn und komme erst heute nacht zurück ins Büro. Werde wohl nicht vor Sonntagabend dazu kommen, mir das näher anzusehen. Vielleicht kannst Du hiermit irgendwas anfangen? Ich erst mal nicht...

VG, Fred