Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Die Delphi-IDE (https://www.delphipraxis.net/62-die-delphi-ide/)
-   -   Quelltext in String konvertieren (https://www.delphipraxis.net/200570-quelltext-string-konvertieren.html)

jottkaerr 3. Mai 2019 09:16

AW: Quelltext in String konvertieren
 
Zitat:

Zitat von Codehunter (Beitrag 1431486)
Zitat:

Zitat von jottkaerr (Beitrag 1431480)
Du könntest mit Suchen&Ersetzen arbeiten.

Interessante Idee! Nur wenn ich das genau so versuche wie beschrieben, sagt Delphi lediglich, dass keine Entsprechungen gefunden werden.

Hast Du diese Einstellungen vorgenommen?
  • bei Optionen nur "Reguläre Ausdrücke" markiert
  • Richtung: Vorwärts
  • Bereich: Markierter Text
  • Beginn: Textanfang

Besonders der letzte Punkt ist wichtig, wenn Du die Textmarkierung von oben nach unten vorgenommen hast.

Außerdem sollte unter Tools/Optionen/Editor-Optionen "BRIEF reguläre Ausdrücke" nicht aktiviert sein.

Allerdings ist mir erst zu spät aufgefallen, dass diese Methode nicht mit einfachen Anführungszeichen im SQL-Befehl zurechtkommt.

Sherlock 3. Mai 2019 09:26

AW: Quelltext in String konvertieren
 
Zitat:

Zitat von Uwe Raabe (Beitrag 1431490)
Die IDE hat im Menü "Bearbeiten" einen Eintrag "Mehrfach einfügen". Dieses Multipaste macht mit den richtigen Einstellungen ziemlich genau was du willst:

Es gibt Dinge, die mich immer wieder erstaunen! Warum habe ich dieses Juwel bisher noch nicht bemerkt?

Sherlock

Codehunter 3. Mai 2019 09:27

AW: Quelltext in String konvertieren
 
Zitat:

Zitat von Uwe Raabe (Beitrag 1431490)
Die IDE hat im Menü "Bearbeiten" einen Eintrag "Mehrfach einfügen". Dieses Multipaste macht mit den richtigen Einstellungen ziemlich genau was du willst:

Da bin ich aber platt... Die IDE kann mal etwas ohne Außenbordmotor? :lol: Die Funktion habe ich noch nie verwendet, noch nicht mal bewusst wahrgenommen dass die da ist. Mit Ausnahme der Einrückungen tuts tatsächlich was ich brauche.
Zitat:

Zitat von dummzeuch (Beitrag 1431492)
Ich weiss, Du hast GExperts schon erwähnt. Aber kennst Du den Editor-Experten "Convert Strings"?

OK, ich sehe gerade, es gibt keine Möglichkeit, dabei die Zeilenumbrüche wegzulassen. Wäre vielleicht eine Erweiterungsidee und gar nicht so kompliziert umzusetzen.

Done.

https://blog.dummzeuch.de/wp-content...rt-Strings.png

Es gibt natürlich davon noch kein Release, aber Du kannst Dir ja einfach eine neue DLL backen. How to compile GExperts.

Schneller wie die Feuerwehr :-) Wenn du das ganz "perfekt" machen willst wären da noch die einrückenden Leerzeichen am Anfang jeder Zeile, die vor und nicht hinter dem einleitenden Hochkomma stehen müssten.

Zitat:

Zitat von jottkaerr (Beitrag 1431494)
Allerdings ist mir erst zu spät aufgefallen, dass diese Methode nicht mit einfachen Anführungszeichen im SQL-Befehl zurechtkommt.

Was dann leider hier zu Problemen führen würde.

Uwe Raabe 3. Mai 2019 11:46

AW: Quelltext in String konvertieren
 
Zitat:

Zitat von Codehunter (Beitrag 1431497)
Mit Ausnahme der Einrückungen tuts tatsächlich was ich brauche.

Hast du den Haken bei "Zwischenablageinhalt kürzen" weggenommen?

hstreicher 3. Mai 2019 11:48

AW: Quelltext in String konvertieren
 
Database Workbench (Kostenpflichtig von upscene.com) hat dazu eingebaute Funktionen für Export to Delphi und Export to C(++)

mfg Hannes

peterbelow 3. Mai 2019 12:47

AW: Quelltext in String konvertieren
 
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:

Zitat von Codehunter (Beitrag 1431471)
Hallo,

Ich habe oft den Fall, dass ich längere mehrzeilige SQL-Queries als String brauche. Entsprechende Einfüge-Funktionen gibts in MMX, CnPack und GExperts, nur dummerweise bei keinem so wie ich es bräuchte. Ein Beispiel:
Code:
SELECT T1.A AS NAME_1,
       T2.A AS NAME_2,
       T2.B AS NAME_3
FROM MY_TABLE_1 AS T1
LEFT JOIN MY_TABLE_2 AS T2
  ON T1.KEYFIELD=T2.KEYFIELD
WHERE T2.C=:MY_PARAM_1
ORDER BY T2.B;
Daraus sollte werden:
Delphi-Quellcode:
'SELECT T1.A AS NAME_1, ' +
       'T2.A AS NAME_2, ' +
       'T2.B AS NAME_3 ' +
'FROM MY_TABLE_1 AS T1 ' +
'LEFT JOIN MY_TABLE_2 AS T2 ' +
  'ON T1.KEYFIELD=T2.KEYFIELD ' +
'WHERE T2.C=:MY_PARAM_1 ' +
'ORDER BY T2.B;';

Ich habe mir dafür mal vor Jahrzehnten ein kleines Hilfsprogramm geschrieben, das ich über das Tools-Menu in die IDEs einklinke. Statement in die Zwischenablage kopieren, Programm aufrufen, den geänderten Text in den Sourcecode einfügen, fertig. Wo hab ich jetzt wieder den Sourcecode dafür gelassen... Oh Mann, 2003. Die Zeit fliegt dahin...

Codehunter 3. Mai 2019 14:12

AW: Quelltext in String konvertieren
 
Ich danke euch erstmal allen für die vielen Vorschläge. Inzwischen bin ich wohlbehalten in Rom angekommen ;-) Allen ein schönes WE!


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:20 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz