A-href Zu Bildern Im Webbrowser Hinzufügen

[horst]

Hallo...,
ich muss in Htmldokumenten folgende Links zu Bilder mit einem Link zu den entspr. größeren Bild verlinken.

Ein Bild einzufügen ist nicht das Problem, mache ich so:

Delphi-Quellcode:

HTMLDocument2Ifc.execCommand('InsertImage', false, ('..\pixklein\' + '' + 'kl' + edit1.text + ''));

Das Ergebnis sieht dann so aus:

Code:

   <TD vAlign=top align=middle>[img]..\pixklein\kluhu.jpg[/img]</TD>
    <TD vAlign=top align=middle>[img]..\pixklein\klDSCN3160.JPG[/img]</TD>

Ich hatte zuerst versucht das ganze gleich bei der Eingabe zu machen mit :

Delphi-Quellcode:

procedure TForm1.Button11Click(Sender: TObject);
var
  HTMLDocument2Ifc: IHTMLDocument2;
  HTMLSelectionObjectIfc: IHTMLSelectionObject;
  HTMLTxtRangeIfc: IHTMLTxtRange;
begin
  HTMLDocument2Ifc := WebBrowser1.Document as IHTMLDocument2;
  HTMLDocument2Ifc.execCommand('InsertImage', False, '');
  HTMLSelectionObjectIfc := HTMLDocument2Ifc.selection;
  if HTMLSelectionObjectIfc.type_ = 'Control' then HTMLSelectionObjectIfc.Clear;
  HTMLTxtRangeIfc := HTMLSelectionObjectIfc.createRange as IHTMLTxtRange;
  HTMLTxtRangeIfc.pasteHTML('[url="../pix/' +'gr'+ edit1.text + '"][img]../pixklein/' +'kl'+ edit1.text + '[/img][/url]');
end;

Das kommt dabei raus...

Code:

[url="file:///C:/CMS1/Data/pix/grDSCN3160.JPG"][img]file:///C:/CMS1/Data/pixklein/klDSCN3160.JPG[/img][/url]

Hat jemand eine Idee wie ich allen

Code:

<TD vAlign=top align=middle>[img]..\pixklein\kluhu.jpg[/img]</TD>

gleich ein a href zu dem größeren Bild hinzufügen kann?
So könnte ich offline mit einer Datei arbeiten mit lokalen Links und online mit den entspr. online-Links

Grüße
Horst

[horst]

hat sich erledigt, hatte einen Denkfehler :)