Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Blackheart,
11. Mai 2007
Du solltest Dir vieleicht noch mal den Crashkurs anschauen. :wink:
Memo1.Text:=ReplaceBetween('<head>','</head>',Memo1.Text,Edit1.Text);
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Blackheart,
10. Mai 2007
Ein Blick in die Delphihilfe hätte das Problem wahrscheinlich gelöst. :wink:
StringReplace(text, '<head>', '<head>' + Edit1.Text, );
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Blackheart,
9. Mai 2007
Caption:=Between('>','<',Memo1.Text);
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Blackheart,
9. Mai 2007
function Between(Tag,Tag2,Text:String):String;
begin
Delete(Text,1,Pos(Tag,Text));
Delete(Text,Pos(Tag2,Text),Length(Text));
Result:=Text;
end;