Thema: Delphi HTML Tags

Einzelnen Beitrag anzeigen

Benutzerbild von Störtebeker
Störtebeker

Registriert seit: 9. Jul 2007
398 Beiträge
 
#18

Re: HTML Tags

  Alt 31. Jul 2007, 11:16
Wie ist den der Code für den Zeilenumbruch?

Delphi-Quellcode:
begin
SynEdit1.seltext:='<script language="JavaScript">';
SynEdit1.seltext:='<!--';
SynEdit1.seltext:='';
SynEdit1.seltext:='//-->';
SynEdit1.seltext:='</script>';
SynEdit1.seltext:='<noscript></noscript>';
end;
dort macht er nämlich folgendes:

<script language="JavaScript"></script><noscript></noscript>

es soll aber folgendermaßen aussehen:

<script language="JavaScript">
<!--

//-->
</script>
<noscript></noscript>

und dass funzt mit dem code nicht.
Mit dem anderen code:

Delphi-Quellcode:
procedure TForm2.script1Click(Sender: TObject);
begin
with synedit1.SelText.lines do
begin
  add('<script language="JavaScript">');
  add('<!--');
  add('');
  add('//-->');
  add('</script>');
  add('<noscript></noscript>');
end;
end;
funzt zwar das mit den absätzen, aber nicht mit dem SelText.
"And he piled upon the whale´s white hump - a sum of all the rage and hate felt by his whole race.
If his chest had been a cannon, he would have shot his heart upon it."
  Mit Zitat antworten Zitat