AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Doppelte durch einfache Hochkommas ersetzen

Ein Thema von Delbor · begonnen am 20. Sep 2019 · letzter Beitrag vom 26. Sep 2019
 
Delbor

Registriert seit: 8. Okt 2006
Ort: St.Gallen/Schweiz
1.186 Beiträge
 
Delphi 11 Alexandria
 
#1

Doppelte durch einfache Hochkommas ersetzen

  Alt 20. Sep 2019, 10:48
Delphi-Version: 10.2 Tokyo
Hi zusammen
Von Workbench habe ich Scripts wie diese exportiert:
Delphi-Quellcode:
CREATE TABLE "PdfOfficerDB"."tblAuthor"("AuthorID" INTEGER PRIMARY KEY NOT NULL,
                                        "Name" VARCHAR(45) NOT NULL,
                                        "Vorname" VARCHAR(45) NOT NULL,
                                        "tblUser_idTblUser" INTEGER NOT NULL,
                                        CONSTRAINT "fk_tblAuthor_tblUser1"
                                          FOREIGN KEY("tblUser_idTblUser")
                                          REFERENCES "tblUser"("idTblUser"));
Und solches soll nun in sowas eingefügt werden:
Delphi-Quellcode:
function TDMLSQLiteOfficerFE.CreateTblFile: string;
  var SQLstring: String;
begin
  SQLstring := 'CREATE TABLE tblFile(FileID INTEGER PRIMARY KEY NOT NULL,'+
                                                     'FilePath" VARCHAR(100) NOT NULL,'+
                                                     'FileType" VARCHAR(5) NOT NULL,'+
                                                     'FileVersion" VARCHAR(3) NOT NULL,'+
                                                     'tblDocuments_DocuID" INTEGER NOT NULL,'+
                                                     'CONSTRAINT fk_tblFile_tblDocuments1'+
                                                       'FOREIGN KEY(tblDocuments_DocuID)'+
                                                       'REFERENCES tblDocuments(DocuID"))';
  Result := SQLString;
end;
Das heisst: einige der doppelten Hochkommas muss ich entfernen, andere durch einfache ersetzen sowie zusätzlich am Ende jeder Zeile den String abschliessen und, wenn der String in dernächsten Zeile fortgesetzt wird, ein + hinzufügen.
Ich hab das erstmal über Suchen und ersetzen versucht, aber da meckert Delphi:
Zitat:
[Content]
Suchbegriff '"' nicht gefunden

[OK]
Gebe ich nichts ein (was im Dialog sichtbar wird, kann zumindest bei mir auch als vier einzelne Hochkommas interpretiert werden), meckert Delphi:
Zitat:
[Content]
Der Suchtext darf nicht leer sein oder leer entsprechen.

[OK]
Versuche ich das mit dem Sync-Arbeitsmodus, kann ich zwar das erste Zeichen löschen, aber gleich danach wird der markierte Bereich aufgehoben.
Wie kriege ich die doppelten Hochkommas weg, ohne jedes einzeln entfernen zu müssen?

Gruss
Delbor
Roger
Man muss und kann nicht alles wissen - man muss nur wissen, wo es steht.
Frei nach Albert Einstein
http://roase.ch

Geändert von Delbor (20. Sep 2019 um 10:52 Uhr)
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:45 Uhr.
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