Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Replace Funktion (https://www.delphipraxis.net/142203-replace-funktion.html)

c1matazz2 23. Okt 2009 16:31


Replace Funktion
 
Hallo ich habe nur ein ganz kleines Programm mit der Replace Funktion,

unzwar Lade ich mir meinen Quelltext von einer Seite in eine Memo,

Und nun will ich auf meinen Button Klicken und dann soll in der Memo etwas bestimmtes Herausgefiltert werden!

Mein Problem ist, ich weiß nich genau wie ich bestimme, das wenn ich den BUTTON klicke, das er denn das alle für die memo ausführt,

naja und ich mache so: replace:='<LI><A href"www.....';

ist das denn richtig?
also soweit geht es ja denn..^^

Frederika 23. Okt 2009 17:09

Re: Replace Funktion
 
Vielleicht suchst Du das:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Text := StringReplace(Memo1.Text, 'alt', 'neu', [rfReplaceAll]);
end;
Versuche mal genauer zu beschreiben, was Dir noch an Code fehlt.

c1matazz2 23. Okt 2009 17:41

Re: Replace Funktion
 
ja glaube schon bloß was ist nun alt und neu
und wie müsste ich sie deklarieren ?

juergen 23. Okt 2009 17:50

Re: Replace Funktion
 
Hallo c1matazz2,

markiere mal StringReplace und drücke die bekannte Taste für Hilfe (F1 :zwinker: ).
Da ich deinem Profil nicht entnehmen kann welche Delphi-Version du hast ist es
möglich dass "nur" die Syntax erklärt ist und ein Beispiel fehlt.

Wenn du die Hilfe nicht verstehst dann frag' einfach noch mal.

Frederika 23. Okt 2009 17:51

Re: Replace Funktion
 
Zitat:

Zitat von c1matazz2
ja glaube schon bloß was ist nun alt und neu
und wie müsste ich sie deklarieren ?

Na ja, mit 'alt' kannst Du irgendeinen String vorgeben, der ersetzt werden soll und mit 'neu' den String, durch den er ersetzt wird.

Das wolltest Du doch, oder? Wie egsagt, sonst beschreibe bitte genauer, was Du suchst.

c1matazz2 23. Okt 2009 17:55

Re: Replace Funktion
 
naja also das hilft mir schonmal,
bloß wie soll ich dann alt und neu bestimmen!?
so? neu:='... dann mein text oder wie?';
und wie soll ich die denn bestimmen?
neu:string;
oder wie?

Frederika 23. Okt 2009 18:16

Re: Replace Funktion
 
Was willst Du denn genau machen? Gib doch am besten mal ein richtiges Beispiel!

c1matazz2 23. Okt 2009 18:43

Re: Replace Funktion
 
:twisted: man! -.-

also ich muss doch irgendwie ALT und NEU irgendwie bestimmen so schwer zu verstehen!?

zB alt:=...
kp was da hin soll
muss ich das nich noch inner var packen oder so?

DeddyH 23. Okt 2009 18:57

Re: Replace Funktion
 
Für ALT musst Du den zu ersetzenden Text eingeben und für NEU den, durch den ersetzt werden soll.
Zitat:

so schwer zu verstehen!?
:twisted:

c1matazz2 23. Okt 2009 19:03

Re: Replace Funktion
 
man denn mach mir doch mal n beispiel wie ich das schreiben soll
OHNE ALT UND NEU HALT
einfach mal n stück quelltext!

DeddyH 23. Okt 2009 19:05

Re: Replace Funktion
 
Steht doch hier. Du wirst doch wohl in der Lage sein, aus 'alt' 'Käsekuchen' und aus 'neu' 'Eierkuchen' zu machen. Wir wissen doch nicht, was Du wodurch ersetzen willst :glaskugel:

c1matazz2 23. Okt 2009 19:08

Re: Replace Funktion
 
ja gut hab ich,

und wie kann ich das machen das er nur bestimmten text anzeigt oder rauszieht?
naja bloß irgendwie soll ja nur ein bestimmter teil des textes drin sein und nicht alles wie mach ich das denn?

DeddyH 23. Okt 2009 19:10

Re: Replace Funktion
 
Moment, Du willst also allen Text aus dem Memo löschen, der nicht Deinem Suchtext entspricht?

c1matazz2 23. Okt 2009 19:11

Re: Replace Funktion
 
ja genau

Frederika 23. Okt 2009 19:14

Re: Replace Funktion
 
Ja genau? Dann bleibt aber nur der Suchtext übrig und den kennst Du doch schon. Ne, also das ergibt für mich alles keinen Sinn.

Warum kannst Du nicht mal einen Beispieltext eintippen, wie er VORHER aussieht und einen wieteren, wie er NACHHER aussehen soll. Das kann doch auch nicht so schwer sein.

haentschman 23. Okt 2009 19:14

Re: Replace Funktion
 
Delphi-Quellcode:
Memo1.Text:= 'SUCHTEXT';
...dann ist nix außer 'SUCHTEXT' im Memo :gruebel:

DeddyH 23. Okt 2009 19:15

Re: Replace Funktion
 
Kommt wohl nur auf die Anzahl an, oder ein Teil des Suchstrings ist variabel, dann würde das noch Sinn ergeben.

c1matazz2 23. Okt 2009 19:16

Re: Replace Funktion
 
er soll nich verändert werden, ich will nur das man in der memo einen bestimmten teil sieht, und das ein bestimmter teil immer ausgeführt wird, wie ein bot halt, dieser teil der gezeigt wird in der memo soll auch ausgeführt werden, also es soll immer wieder darauf gegangen werden :D

DeddyH 23. Okt 2009 19:18

Re: Replace Funktion
 
Das ist mir zu hoch, ich verabwinker mich.

Die Muhkuh 23. Okt 2009 19:19

Re: Replace Funktion
 
Ein ganz dezentes: hä? :glaskugel:

Frederika 23. Okt 2009 19:21

Re: Replace Funktion
 
Wie ein Bot? Sag mal, wovon sprichst Du?

Bitte ein konkretes Beispiel. Wird ja wohl kaum streng geheim sein.

c1matazz2 23. Okt 2009 19:23

Re: Replace Funktion
 
^^

Die Muhkuh 23. Okt 2009 19:28

Re: Replace Funktion
 
Du willst Hilfe, dann kann man ja wohl mal erwarten, eine gescheite Beschreibung von Dir zu bekommen und nicht immer nur irgendwelche total sinnlosen Gesprächsfetzen!

c1matazz2 23. Okt 2009 19:36

Re: Replace Funktion
 
Undzwar,

ich habe einen Webbrowser, ein Label und eine Memo,

ich klicke auf das Label, das einen Teil des Textes in die memo läd,

soweit alles gut,

nun will ich nur noch, das, wenn ich auf das label klicke, das er dann immer diese Aktion wieder hohlt wo er hingehen soll, also

ich habe einen stück des quelltextes reingelegt, dort soll er dann immer automatisch raufgehen, brauche ich dafür einen Timer ?

Frederika 23. Okt 2009 19:43

Re: Replace Funktion
 
Sag mal, ist heute der erste April? Das ist ja wie Satire.

Ich habe wirklich ein großes Herz, aber ich verstehe absolut nicht, was Du machen willst. Die letzte Beschreibung ist völlig anders als die vorigen.

Die Muhkuh 23. Okt 2009 19:53

Re: Replace Funktion
 
:lol:


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:12 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz