AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken GUIDToString: welche Feldgrösse in der DB?
Thema durchsuchen
Ansicht
Themen-Optionen

GUIDToString: welche Feldgrösse in der DB?

Ein Thema von Delbor · begonnen am 3. Mär 2016 · letzter Beitrag vom 3. Mär 2016
Antwort Antwort
Seite 2 von 2     12   
Benutzerbild von Zacherl
Zacherl

Registriert seit: 3. Sep 2004
4.629 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#11

AW: GUIDToString: welche Feldgrösse in der DB?

  Alt 3. Mär 2016, 16:38
Demnach lege ich den Datentyp in der DB als 'VARBINARY(16)' fest.
Besser BINARY mit fixer Länge, falls es diesen Typ äquivalent zu CHAR/VARCHAR geben sollte. Die Länge der GUID bleibt ja immer 16 und ändert sich nicht.
Projekte:
- GitHub (Profil, zyantific)
- zYan Disassembler Engine ( Zydis Online, Zydis GitHub)
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.033 Beiträge
 
Delphi 12 Athens
 
#12

AW: GUIDToString: welche Feldgrösse in der DB?

  Alt 3. Mär 2016, 17:01
Der Zeichensatz/CharSet/Collation ist erstmal egal, das die GUID als String nur ASCII ist und das praktisch überall rein passt.

Bei BINARY(16) passt die GUID binär rein und bei BINARY(38) bzw. CHAR(38) als String.

Und vom Zeichensatz/CharSet/Collation des Feldes (Spalte) hängt ab, wie viel Speicher das Ding intern braucht.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
RSF

Registriert seit: 13. Mär 2008
153 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#13

AW: GUIDToString: welche Feldgrösse in der DB?

  Alt 3. Mär 2016, 23:32
Ich benutze GUID in ID-Felder als CHAR(32)
Delphi-Quellcode:
function DB_GUID: String;
var
  NewGUID: TGUID;
  S: string;
begin
 CreateGUID(NewGUID);
 S:=GUIDToString(NewGUID);
 // Sonderzeichen entfernen ({,},-)
 while Pos('{', S) > 0 do
    Delete(S,Pos('{', S),1);
 while Pos('}', S) > 0 do
    Delete(S,Pos('}', S),1);
 while Pos('-', S) > 0 do
    Delete(S,Pos('-', S),1);
 Result:=S; // CAHR(32)
end;
Ronald
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


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 06:44 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