Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Einfache Anführungszeichen im String


Regan - Di 19.12.06 19:24
Titel: Einfache Anführungszeichen im String
Hallo,
ich schreib grad an nem Programm, dass den Code für ein andres Programm schreiben soll.

Nu zum Problem: Mein Code sieht so aus:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
procedure TForm1.Button1Click(Sender: TObject);
var i, a, u, o:Integer;
q,w,e,r:String;
begin

For o:=0 to 311 do
begin
For u:=0 to 3 do
begin
q:=ListBox1.Items.Strings[u];
  For a:=0 to 12 do
  begin
  w:=ListBox2.Items.Strings[a];
    For i:=0 to 5 do
    begin
    Memo1.Lines.Add('card'+IntToStr(o)+'.Name:=`'+q+' '+w+'`;'); 
    end;
  end;
end;
end;

An diese Stellen soll jetz das einfache Anfürhugnszeinech "'". Bloß das geht net, weil da Delphi denkt, der String würde aufhören. Wie krieg ich denn nun da n einfaches anfürhungszeinech hin?


Christian S. - Di 19.12.06 19:26

Ein einfaches Anführungszeichen bekommt man in einen String, indem man zwei rein macht :D


Delphi-Quelltext
1:
 myString:='foo''bar';                    


Regan - Di 19.12.06 19:29

user profile iconChristian S. hat folgendes geschrieben:
Ein einfaches Anführungszeichen bekommt man in einen String, indem man zwei rein macht :D


Delphi-Quelltext
1:
 myString:='foo''bar';                    

und warum konntest du mir das nicht gleich sagen?
Egal. Danke schön.


Christian S. - Di 19.12.06 19:46

user profile iconRegan hat folgendes geschrieben:
und warum konntest du mir das nicht gleich sagen?
Weil dieses Forum dazu da ist, allen zu helfen und nicht nur denen, die gerade im richtigen Moment in die Shoutbox sehen.

Dieser Thread kann über die Suchfunktion gefunden werden und bleibt erhalten. Eine Antwort in der Shoutbox nicht.


(Irgendwann schreib ich mir für diese Erklärung mal einen Entwurf, den ich dann nur einfügen muss :roll:)


Regan - Mo 25.12.06 21:36

OK. Aber wie mache ich das, wenn ich vor dem String keinen Text habe?

Delphi-Quelltext
1:
Memo1.Lines.Add('carddeck['+IntToStr(i)+'].Name:='''+carddeck[i-52].Name+''';');                    


//EDIT: Gelöst: hab anführungszeichen vergessen