Name des Benutzers

[kiki]

Und wie kann ich da einen Wert erhalten, zb das der Username Name$ ist und wie kann ich den Wert dann in eine .txt Datei schrieben???

[ts-soft]

Code: Alles auswählen

Name$ = StringField(GetHomeDirectory(), CountString(GetHomeDirectory(), "\"), "\")
If Name$
  File = CreateFile(#PB_Any, "Userliste.txt")
  If File
    WriteStringN(File, Name$)
    CloseFile(File)
  EndIf
EndIf

[edel]

Müsste ungefähr so gehen nur bei der Message hab ich Probleme.

Code: Alles auswählen

Buffer.s=Space(256) 
nSize.l=256 

RET=GetUserName_(@Buffer,@nSize) 


MessageRequester("Kein Kommentar", "+PeekS(Buffer)+", 0)

Stimmt, nur wie kann man das in die Message einfügen???

Code: Alles auswählen

Buffer.s=Space(256)
nSize.l=256

ret=GetUserName_(@Buffer,@nSize)


MessageRequester("Kein Kommentar", Buffer, 0)

Buffer ist doch schon ein String.

[Marvin]

Vlt sollte man auch mit RTrim() arbeiten, schließlich enthält Buffer anfangs ja nur Leerzeichen...

Code: Alles auswählen

Buffer.s=Space(256) 
nSize.l=256 

ret=GetUserName_(@Buffer,@nSize) 


MessageRequester("Kein Kommentar", RTrim(Buffer), 0)

Sieht zwar keiner, aber ist evtl für Pfadangaben besser...

[ts-soft]

Vlt sollte man auch mit RTrim() arbeiten, schließlich enthält Buffer anfangs ja nur Leerzeichen...

Code: Alles auswählen

Buffer.s=Space(256) 
nSize.l=256 

ret=GetUserName_(@Buffer,@nSize) 


MessageRequester("Kein Kommentar", RTrim(Buffer), 0)

Sieht zwar keiner, aber ist evtl für Pfadangaben besser...

Falsch

Code: Alles auswählen

Buffer.s=Space(256)
nSize.l=256

ret=GetUserName_(@Buffer,@nSize)
Debug Len(Buffer)

MessageRequester("Kein Kommentar", Buffer, 0)

Vergleiche einfach den Debug mit der Namenslänge, bzw. die Tatsache
das der Debug kein 256 ausgibt sollte doch genügen

[MVXA]

afaik schreibt GetUserName grundsätzlich an das Ende des Strings ein \0.
Gibt aber Sprachen, denen ist ein \0 im String schnuppe. Für die brauchst
du dann halt noch die Angabe nSize.

[Marvin]

thx, ich hab immer so gearbeitet...

[ts-soft]

thx, ich hab immer so gearbeitet...

Wenn man sich nicht sicher ist, sollte man es auch tun oder eben überprüfen

[MVXA]

Macht ja eigentlich auch keinen großen Unterschied.