memo hyperlink

Jeps, alt er muligt, det er bare et spørgsmål om tid *S*

if Memo.Lines[<Line-Index>][<Char-Index>] = \'W\' then
begin
  do someting.....
end;

Forskellige Fonte i et memo er ikke muligt, så skal du over i en RichEdit, men den virker også lige sådan ( stort set ) mht. lines osv. der er dog en function der heder findtext ( eller noget i den stil ) som du kan bruge til at lede efter \'WWW.\' f.eks.

Du kan tilgå teksten i en memo via memo.text.
Den kunne du så bruge i pos på denne måde:

UrlStart:=pos(\'HTTP://\',memo.text);

Herefter finder du hele url\'en ved at sige

TempString:=copy(memo.text,UrlStart,length(memo.text));

Url:=copy(TempString,0,pos(\' \',TempString);

nazaq har ret, det er nok nemere, men det løser ikke font problemet

/Martin

Martin> Du har ret :-)
Og så har du jo givet løsningen mht. en Richedit

Har ikke haft tid til at prøve for alvor men forsøgte i en fart igår og der ville den ikke compilere dette [<Line-Index>][<Char-Index>]. Den siger et eller andet om at den forventer et udtryk fremfor [ eller <.
En anden ting er hvordan man ændre fonten på det ord eller de ord man nu har fundet.

Mads

Martin lind hvor har du det her fra [<Line-Index>][<Char-Index>] jeg kan nemlig ikke umiddelbart finde det i hjælpefilen, og compileren vil ikke vide af det.

Mads

Hej nu har jeg selv lavet en løsning. Der er på delphipages.com en component ved navn richedit98 den kan lige det jeg have brug for med hensyn til hyperlinks.
Ellers tak for hjælpen og i skal nok få lidt point for ulejligheden.

Mads

Hej Mads det er alm StringIndexing det \"funker\" fint i pascal f.eks. :

VAR
  Strx : String

begin
  Strx := \'ACCDE\';
  Strx[2] := \'B\';
end;