Suche bestimmten Wert in Memo und zeige mir den neben stehenden Wert an im Edit feld

[Popov]

[QUOTE=Sir Rufo;1151793]

Zitat von Furtbichler:

Echte Kerle programmieren alles selber ...

Ich bin ganz ordentlich Delphi 3 geschädigt, da ich mehr oder weniger damit aus gegebenem Anlass arbeiten sollte. Deshalb bin ich ein Purist. Und da Delphi 3 so was wie PosEx oder ReplaceStr nicht kennt und ich es nie geschafft habe eine ordentliche Unit mit den Erweiterungen mir anzulegen, verzichte ich auch heute noch auf die Funktionen und proge es alleine.

[klaus9]

vielen Dank das hilft mir schon super weiter ..

dankeschön

[himitsu]

Man mag es nicht glauben ... TEdit ist am Ende auch nur eine gekapselte Windows-Komponente.
Diese ist mehrzeilig und es gibt gewisse Schnittstellen.

Sogar Eine, die man fragen kann, in welcher Zeile sich ein bestimmtes Zeichen befindet.
EM_POSFROMCHAR
Dazu gibt es sogar noch Befehle zum Suchen usw.

Aber man kann auch einfach, so es wie gleich am Anfang von irgendwem schonmal genannt wurde,
jede Zeile einzeln durchsuchen und schon hat man automatisch auch die Zeile, worin man etwas gefunden hatte.

[Popov]

Zitat von himitsu:

Aber man kann auch einfach, so es wie gleich am Anfang von irgendwem schonmal genannt wurde,
jede Zeile einzeln durchsuchen und schon hat man automatisch auch die Zeile, worin man etwas gefunden hatte.

Auch wenn das etwas sarkastisch gemeint ist, es gibt die Methode mit den Hausmitteln und die etwas elegante aber wissensintensivere Methode über Messages. Sir Rufo würde sagen: warum kompliziert, wenn es auch einfach geht. mit for to und pos mag zwar nicht elegant sein, aber das ist gutes Pascal. Und dagegen ist nichts auszusetzten. Ich habe gerade vor Wochen einen Editor benötigt und brauchte den halben Tag um mir alle Möglichkeiten (sprich Positionen über Messages ermitteln) anzueignen. Nur wozu einen halben Tag opfern wenn man es in 30 Sekunden auch mit Hausmitteln hinkriegt?

[himitsu]

Zitat von himitsu:

Aber man kann auch einfach, so es wie gleich am Anfang von irgendwem schonmal genannt wurde, ...

Hab nichts anderes behauptet, siehe Antwort 1 / Beitrag #2, Zeile 2.
Aber dem TE scheint diese Lösung wohl nicht zu gefallen.