Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Problem mit String (https://www.delphipraxis.net/163665-problem-mit-string.html)

Mazen 10. Okt 2011 11:49

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:
ShowMessage('benutzer = '''+userName+'''');
nicht eigneltich als Ausgabe folgendes geben:
Code:
benutzer = 'admin'
??

Er gibt mir aber:
Code:
benutzer = 'admin
Auch
Code:
ShowMessage('benutzer = '''+userName+#39);
Funktioniert nicht... immer fehlt das letzte Hochkomma Oo
Weiß jemand wodran das liegt?

Klaus01 10. Okt 2011 11:54

AW: Problem mit String
 
Hallo,

funktionert es so:
Delphi-Quellcode:
showMessage(format('Benutzer = '' %s '' ',[userName]));
Grüße
Klaus

stahli 10. Okt 2011 11:54

AW: Problem mit String
 
Ohne Format ginge es so:

Delphi-Quellcode:
ShowMessage('benutzer = ' + '''' + userName + '''');
Das liest sich zwar auch nicht besonders gut, aber so behält man zumindest etwas besser den Überblick.

mkinzler 10. Okt 2011 11:55

AW: Problem mit String
 
Delphi-Quellcode:
Oder
ShowMessage('benutzer = '+QuotedStr(userName));

DeddyH 10. Okt 2011 11:57

AW: Problem mit String
 
Diese 3 funktionieren bei mir hier (XE auf Vista 32) alle:
Delphi-Quellcode:
  ShowMessage('benutzer = '''+userName+'''');
  ShowMessage('benutzer = ' + QuotedStr(userName));
  ShowMessage(Format('benutzer = %s', [QuotedStr(userName)]));
[edit] Ist der rote Kasten wieder im Urlaub? [/edit]

Mazen 10. Okt 2011 12:00

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+'''');

Klaus01 10. Okt 2011 12:06

AW: Problem mit String
 
Delphi-Quellcode:
GetUserName(PChar(sUserName), dwUserNameLen);
SetLength(sUserName, dwUserNameLen);
Result := trim(sUserName);
vielleicht hast Du noch ein #0 am Ende Deines Usernamens.
trim sollte da helfen.

Grüße
Klaus

Luckie 10. Okt 2011 12:15

AW: Problem mit String
 
Zitat:

Zitat von Klaus01 (Beitrag 1129594)
vielleicht hast Du noch ein #0 am Ende Deines Usernamens.

Nicht nur vielleicht, sondern mit absoluter Sicherheit.

Mazen 10. Okt 2011 12:46

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