Wie ein ' Zeichen zwischen ' '

**Störtebeker**

Hi,

für meinen Editor würde ich gerne noch als Syntax VB integrieren. Dort wird ein Kommentar ja mit dem zeichen ' eingleitet. Nur funktioniert das jetzt nicht ganz:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure Tcomment.Button1Click(Sender: TObject);

begin

  case Form1.ComboBox2.ItemIndex of

  0: Form1.SynEdit1.SelText:='//'+Memo1.Text;             //C++

  1: Form1.SynEdit1.SelText:='/*'+Memo1.Text+'*/';        //CSS

  2: Form1.SynEdit1.SelText:='';     //HTML

  3: Form1.SynEdit1.SelText:='//'+Memo1.Text;             //JAVA

  4: Form1.SynEdit1.SelText:='{'+Memo1.Text+'}';          //PASCA

  5: Form1.SynEdit1.SelText:='#'+Memo1.Text;              //PERL

  6: Form1.SynEdit1.SelText:='#'+Memo1.Text;              //PHP

  7: Form1.SynEdit1.SelText:='#'+Memo1.Text;              //PYTHON

  8: Form1.SynEdit1.SelText:='--'+Memo1.Text;             //SQL

  9: Form1.SynEdit1.SelText:='';     //XML

 10: Form1.SynEdit1.SelText:=' ' '+Memo1.Text;             //VB  --> hier funzt das nicht ganz.

  end;

  Memo1.Clear;

  comment.Close;

end;

10: Form1.SynEdit1.SelText:=' ' '+Memo1.Text; //VB --> das geht nicht
10: Form1.SynEdit1.SelText:=' ' ' '+Memo1.Text; //VB --> würde gehen, ist aber falsch

Wer weiß Rat??

**Meflin**

Zitat von Störtebeker:

10: Form1.SynEdit1.SelText:=' ' ' '+Memo1.Text; //VB --> würde gehen, ist aber falsch

Was wäre daran falsch? Das sollte doch genau ein ' einfügen

**Störtebeker**

Irgendwie nicht. Es ergibt nämlich gar nichts. Leider.

**Meflin**

Zitat von Störtebeker:

Irgendwie nicht. Es ergibt nämlich gar nichts. Leider.

WTF? Wie gibst du das denn aus? Bzw. Woran siehst du, dass es "nichts" einfügt?
edit: bzw. versuch doch einfach mal sowas wie ShowMessage('''')

**stoxx**

ein Hochkomma wird einfach ersetzt durch 2 Hochkommas
ShowMessage('Beispiel: ''Hochkomma'' ... genau');

**Störtebeker**

Danke. Jetzt funktioniert es.

Weiß auch nicht, wodran es gelegen aht, dass es nicht funktioniert hat. Jetzt geht es auf jeden Fall. Und zwar so, wie ihr es beschrieben habt. Mit den zwei ''.

Wie ein ' Zeichen zwischen ' '

Wie ein ' Zeichen zwischen ' '

Re: Wie ein ' Zeichen zwischen ' '

Re: Wie ein ' Zeichen zwischen ' '

Re: Wie ein ' Zeichen zwischen ' '

Re: Wie ein ' Zeichen zwischen ' '

Re: Wie ein ' Zeichen zwischen ' '

Forumregeln

Meflin Registriert seit: 21. Aug 2003 4.856 Beiträge	#2 Re: Wie ein ' Zeichen zwischen ' ' 14. Feb 2009, 14:09 Zitat von Störtebeker: 10: Form1.SynEdit1.SelText:=' ' ' '+Memo1.Text; //VB --> würde gehen, ist aber falsch Was wäre daran falsch? Das sollte doch genau ein ' einfügen Leo S. https://github.com/leoschweizer
	Zitat

Störtebeker Registriert seit: 9. Jul 2007 398 Beiträge	#3 Re: Wie ein ' Zeichen zwischen ' ' 14. Feb 2009, 14:12 Irgendwie nicht. Es ergibt nämlich gar nichts. Leider. "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

Meflin Registriert seit: 21. Aug 2003 4.856 Beiträge	#4 Re: Wie ein ' Zeichen zwischen ' ' 14. Feb 2009, 14:13 Zitat von Störtebeker: Irgendwie nicht. Es ergibt nämlich gar nichts. Leider. WTF? Wie gibst du das denn aus? Bzw. Woran siehst du, dass es "nichts" einfügt? edit: bzw. versuch doch einfach mal sowas wie ShowMessage('''') Leo S. https://github.com/leoschweizer
	Zitat

stoxx Registriert seit: 13. Aug 2003 1.111 Beiträge	#5 Re: Wie ein ' Zeichen zwischen ' ' 14. Feb 2009, 14:21 ein Hochkomma wird einfach ersetzt durch 2 Hochkommas ShowMessage('Beispiel: ''Hochkomma'' ... genau'); Phantasie ist etwas, was sich manche Leute gar nicht vorstellen können.
	Zitat