HTML Tags

**Störtebeker**

Ja. Ohne findet er sie, kann das Programm aber trotzdem nicht starten, weil ihm dann die SynEdit fehlt. Also Delphi findet die System.dcu , wenn ich den Pfad von SynEdit.dcu nicht in die Library einfüge. Dann kann er das Programm starten. Natürlich ohne irgendeine SynEdit Komponente.

**Störtebeker**

Das Problem mit SynEdit hat sich erledigt.

Es lag an folgendem Problem:

Die SynEdit.zip enthält folgende Ordner:

-Demos
-Packages
-Source
-SynGen

Ich habe nach der Installation von SynEdit die Delphi Library mit dem Packages Ordner erweitert. Ich darf aber die Library aber NUR mit dem Source Ordner erweitern.

Also dem, wo praktisch die einzelnen SynEdit Komponenten drin sind. Dann funktioniert es. Aber trotzdem THX. für eure Hilfe. Vielleicht kann sich das ja einer von euch erklären. Hauptsache es funkioniert!! Und das tut es nun.

**Störtebeker**

Trotzdem noch mal ne Frage:

markieren

Delphi-Quellcode:

			begin

SynEdit1.Lines.add('<html></html>');

end;

mit diesem code setzte ich über Klick im mainmenü die Tags "<html>" und "</html>"

Das sieht dann im Editfenster folgendermaßen aus:

<html></html>

gibt es die möglichkeit den code so zu ändern, das folgendes herauskommt:

<html>

</html>

P.S.: SynEdit ist doch Freeware, oder?

**Namenloser**

markieren

Delphi-Quellcode:

			with synedit1.lines do

begin

  add('<html>');

  add('');

  add('</html>');

end;

oder
synedit1.lines.add('<html>'#13#10#13#10'</html>'; Hättest du aber auch selbst drauf kommen können

Achja: SynEdit ist natürlich Freeware

**Störtebeker**

Danke.

Zitat:

markieren

Delphi-Quellcode:

			with synedit1.lines do

begin

  add('<html>');

  add('');

  add('</html>');

end;

hat funktioniert

Zitat:

oder
synedit1.lines.add('<html>'#13#10#13#10'</html>';

hat nicht funktioniert

und gleich die nächste frage, sry.

Im SynEditfeld kann ich im OI ja die Highlighter wählen, die dann praktisch irgendwie hervorgehoben werden. Allerdings nur jeweils einen Highlighter. Also ich kann jetzt zum Beispiel nicht HTML Highlighter UND JavaScript Highlighter aktivieren, oder?

Und wie kriege ich das hin, das der text dort eingesetzt wird, wo der cursor ist? Der Text wird nämlich immer hinten dran gehängt. SRY., ist bestimmt Delphi-Grundwissen.

Mit

zusammenfalten · markieren

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;

geht es jedenfalls nicht.

**Blackheart**

SynEdit1.SelText:='Mein an Cursorposition eingesetzter Text';

**hincapie**

Zitat von Störtebeker:

Im SynEditfeld kann ich im OI ja die Highlighter wählen, die dann praktisch irgendwie hervorgehoben werden. Allerdings nur jeweils einen Highlighter. Also ich kann jetzt zum Beispiel nicht HTML Highlighter UND JavaScript Highlighter aktivieren, oder?

Schau mal auf diesen Seiten nach TSynWebSyn, das ist ein Highlighter u. a. für HTML, PHP und Javascript:
-

http://sourceforge.net/projects/synweb
-

http://flatdev.ovh.org

**Störtebeker**

Wie ist den der Code für den Zeilenumbruch?

markieren

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:

zusammenfalten · markieren

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.

**arbu man**

string := #13#10+'Ich steh in einer Zeile'+#13#10+'Ich in einer anderen :('

**Störtebeker**

Danke, funzt super.

HTML Tags

Re: HTML Tags

Re: HTML Tags

Re: HTML Tags

Re: HTML Tags

Re: HTML Tags

Re: HTML Tags

Re: HTML Tags

Re: HTML Tags

Re: HTML Tags

Re: HTML Tags

Forumregeln

Namenloser Registriert seit: 7. Jun 2006 Ort: Karlsruhe 3.724 Beiträge FreePascal / Lazarus	#14 Re: HTML Tags 31. Jul 2007, 01:05 markieren Delphi-Quellcode: with synedit1.lines do begin add('<html>'); add(''); add('</html>'); end; oder synedit1.lines.add('<html>'#13#10#13#10'</html>'; Hättest du aber auch selbst drauf kommen können Achja: SynEdit ist natürlich Freeware
	Zitat

Blackheart Registriert seit: 4. Mai 2005 846 Beiträge Delphi 7 Enterprise	#16 Re: HTML Tags 31. Jul 2007, 07:00 SynEdit1.SelText:='Mein an Cursorposition eingesetzter Text'; Blackheart
	Zitat

arbu man Registriert seit: 3. Nov 2004 Ort: Krefeld 1.108 Beiträge Delphi 7 Professional	#19 Re: HTML Tags 31. Jul 2007, 11:55 string := #13#10+'Ich steh in einer Zeile'+#13#10+'Ich in einer anderen :(' Björn >> http://bsnx.net << Virtual DP Stammtisch v1.0"iw" am 19.09.2007 - ich war dabei!
	Zitat

Störtebeker Registriert seit: 9. Jul 2007 398 Beiträge	#20 Re: HTML Tags 31. Jul 2007, 12:00 Danke, funzt super. "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."
	Zitat