![]() |
Problem mit String
Hallo Leute, habe ein merkwürdiges Problem mit 'nem String :/
Vielleicht hab ich auch einfach nur nen mächtiges Brett vorm Kopf, aber ich versteh einfach nicht wieso das nciht geht :/ Sollte mir folgender Code
Code:
nicht eigneltich als Ausgabe folgendes geben:
ShowMessage('benutzer = '''+userName+'''');
Code:
??
benutzer = 'admin'
Er gibt mir aber:
Code:
Auch
benutzer = 'admin
Code:
Funktioniert nicht... immer fehlt das letzte Hochkomma Oo
ShowMessage('benutzer = '''+userName+#39);
Weiß jemand wodran das liegt? |
AW: Problem mit String
Hallo,
funktionert es so:
Delphi-Quellcode:
Grüße
showMessage(format('Benutzer = '' %s '' ',[userName]));
Klaus |
AW: Problem mit String
Ohne Format ginge es so:
Delphi-Quellcode:
Das liest sich zwar auch nicht besonders gut, aber so behält man zumindest etwas besser den Überblick.
ShowMessage('benutzer = ' + '''' + userName + '''');
|
AW: Problem mit String
Delphi-Quellcode:
Oder
ShowMessage('benutzer = '+QuotedStr(userName)); |
AW: Problem mit String
Diese 3 funktionieren bei mir hier (XE auf Vista 32) alle:
Delphi-Quellcode:
[edit] Ist der rote Kasten wieder im Urlaub? [/edit]
ShowMessage('benutzer = '''+userName+'''');
ShowMessage('benutzer = ' + QuotedStr(userName)); ShowMessage(Format('benutzer = %s', [QuotedStr(userName)])); |
AW: Problem mit String
Ich merk schon, es liegt wohl doch nicht an mir sondern irgendwie an Delphi...
Danke für alle eure Vorschläge, leider funktionier jedoch keiner davon :/ Wie immer fehlt das letze Hochkomma... Oo Hier mal ein größerer Ausschnitt, vielleicht leigt der Fehler ja woanders: Die funktion hier hab ich hier aus dem Forum kopiert...
Code:
function TfrmMain.getCurrentUserName(): string;
const cnMaxUserNameLen = 254; var sUserName: string; dwUserNameLen: DWORD; begin dwUserNameLen := cnMaxUserNameLen - 1; SetLength(sUserName, cnMaxUserNameLen); GetUserName(PChar(sUserName), dwUserNameLen); SetLength(sUserName, dwUserNameLen); Result := sUserName; end;
Code:
userName := getCurrentUserName;
ShowMessage('benutzer = '''+userName+''''); |
AW: Problem mit String
Delphi-Quellcode:
vielleicht hast Du noch ein #0 am Ende Deines Usernamens.
GetUserName(PChar(sUserName), dwUserNameLen);
SetLength(sUserName, dwUserNameLen); Result := trim(sUserName); trim sollte da helfen. Grüße Klaus |
AW: Problem mit String
Zitat:
|
AW: Problem mit String
Ja, das wars...
Danke euch allen ;) |
Alle Zeitangaben in WEZ +1. Es ist jetzt 20:02 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz