Mehrzeiligen Text zuweisen incl. '

[Delphi.Narium]

Ja und?

Routine umdrehen:

Alles bis zum ersten ' weg.
Alles bis zum letzten ' weg.
Doppelte '' durch ' ersetzen?

Macht also genau einen zweiten Button aus.

Delphi-Quellcode:

var
  s : String;
  i : Integer;
begin
  Memo1.Lines.Clear;
  Memo1.PasteFromClipboard;
  Memo2.Lines.Clear;
  for i := 0 to Memo1.Lines.Count - 1 do begin
    s := Memo1.Lines[i];
    s := Copy(s,Pos('''',s) + 1, Length(s);
    s := ReverseString(s);
    s := Copy(s,1,Pos('''',s) + 1,Length(s)); 
    s := ReverseString(s);
    s := AnsiReplaceText(s,'''''','''');
    Memo2.Lines.Add(s);
  end;
  Memo2.SelectAll;
  Memo2.CopyToClipboard; 
end;

[Rollo62]

Zitat:

Zitat von Delphi.Narium (Beitrag 1473942)

Tool schreiben:

+1 :thumb:
Gemäß: Eat your own dogfood ...
Mache sowas für SVG.

[Rollo62]

Ich müsste mir mal Allister Chrities neues Buch anschaffen,
womöglich gibt es auch Möglichkeiten in der IDE kleine Scripte o.ä. auszuführen, bei Custom Hotkeys ?

[freimatz]

Wie dem auch sei halte ich getrennte Dateien (also z.B. in Ressourcen) für besser. In einer Datei mehrere Sprachen zu mischen ist voll unclean.

[Rollo62]

Zitat:

Zitat von freimatz (Beitrag 1473952)

Wie dem auch sei halte ich getrennte Dateien (also z.B. in Ressourcen) für besser. In einer Datei mehrere Sprachen zu mischen ist voll unclean.

:thumb:

[himitsu]

Zitat:

Zitat von Rollo62 (Beitrag 1473940)

Delphi-Quellcode:

     'create table Tabelle1 '//
    +'(ID int not null Identity (1,1), '//
    +'Datum Datetime, '//
    +'Result varchar(15), '//
    +'Info varchar(50) null) '//
    +'on [primary] '//

Sowas wäre vielleicht noch am wenigsten schmerzhaft, man kann die überflüssigen
+' und '// leichter finden und rauslöschen.

Ja, die

Delphi-Quellcode:

//

sind total überflüssig und IMHO auch optisch nervend störend .... braucht eh niemand, wenn man den Editor bedienen richtig kann.


Das ist auch nur mehrzeillig im Quellcode, aber NICHT im Text.

Delphi-Quellcode:

     'create table Tabelle1 '#10
    +'(ID int not null Identity (1,1), '#10
    +'Datum Datetime, '#10
    +'Result varchar(15), '#10
    +'Info varchar(50) null) '#10
    +'on [primary] ';

Die StringList macht aus dem #10 schon ein #13#10 (sLineBreak), also nicht nötig da mehr zu schreiben.



Und keine Ahnung, warum man sich bei Emba derartig wehement dagegen wehrt einen MultiLine-String in die Syntax einzufügen-

[Rollo62]

Zitat:

Zitat von himitsu (Beitrag 1473973)

Ja, die

Delphi-Quellcode:

//

sind total überflüssig und IMHO auch optisch nervend störend ....

Natürlich,
die helfen aber beim Suchen/Ersetzen um eventuell wichtige

Delphi-Quellcode:

,

zu identifizieren, und nicht aus Versehen zu löschen.

Kommt halt immer drauf an was dem TE wichtig ist.

[norwegen60]

[QUOTE=himitsu;1473973]

Zitat:

Zitat von Rollo62 (Beitrag 1473940)

Delphi-Quellcode:

     'create table Tabelle1 '//
    +'(ID int not null Identity (1,1), '//
    +'Datum Datetime, '//
    +'Result varchar(15), '//
    +'Info varchar(50) null) '//
    +'on [primary] '//

Egal ob so oder so wie modifiziert. Beid ehaben den großen Nachteil, dass es immer noch die doppelten '' gibt um Strings zu kennzeichnen. Die sind bei umfangreichen SQL fast nerviger als der Text davor oder danach.

Meine Frage ist aber beantwortet. Ohne Zusatzaufwand ist es nicht möglich.

Wenn schon, dann gefällt mir die Lösung mit den Resourcen besser.

Im Grunde geht es um das Updaten der DB zwischen verschiedenen Versionen. Da könnte man per Version, die en Update benötig, ein File erstellen

[Rollo62]

Zitat:

Zitat von norwegen60 (Beitrag 1473978)

Wenn schon, dann gefällt mir die Lösung mit den Resourcen besser.

Mir auch.
Ich lege in DB-Projekten auch gern mal generelle Sql-Abfragen als *.TXT Files in Unterverzeichnissen ab (man muss nicht unbeding Ressourcen nehmen).
Das ist sehr praktisch und Übersichtlich, so kann die Abfrage ohne Compiler optimiert werden, und ich kann den Text auch 1:1 in ein externes SQL-Tool werfen.
Man muss natürlich das FileOpen mit einrechnen, für permanente, schnelle Abfragen könnte das zu viel Overhead sein.

[haentschman]

Zitat:

Das ist sehr praktisch und Übersichtlich

...hat aber für die SQL Injection Tür und Tor offen. :warn: