Entwickler-Ecke
Sonstiges (Delphi) - Benutzernamen ermitteln und anzeigen
agent_x - Fr 10.08.07 09:21
Titel: Benutzernamen ermitteln und anzeigen
hallo,
ich möchte, dass in meinem programm der Benutzername angezeigt wird.
Ein Script hab ich gefunden:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10:
| function GetUsername: String; var Buffer: array[0..255] of Char; Size: DWord; begin Size := SizeOf(Buffer); if not Windows.GetUserName(Buffer, Size) then RaiseLastOSError; SetString(Result, Buffer, Size - 1); end; |
.
aber jetzt will ich, dass der Bn angezeigt wird. Wie geht das?
Delete - Fr 10.08.07 09:35
Label1.Caption := GetUsername;
agent_x - Fr 10.08.07 09:44
danke hat sich geklärt
und noch eins, wie kann man, dass machen das der Bn nicht erst angezeigt wird wenn man auf die
Label klickt sondern schon am anfang des Programms?
hier mein jetziger Code von der Label3 [ist die Label wo der Benutzername stehen soll]:
Delphi-Quelltext
1: 2: 3: 4:
| procedure TForm1.Label3click(Sender: TObject); begin Label3.Caption := GetUsername; end; |
arj - Fr 10.08.07 12:15
Das ganze ins FormShow oder FormCreate machen.
agent_x - Fr 10.08.07 12:20
also so oder wie:?
Delphi-Quelltext
1: 2: 3: 4:
| procedure TForm.FormCreate (Sender: TObject) begin Label3.Caption := GetUsername; end; |
Marco D. - Fr 10.08.07 12:24
agent_x hat folgendes geschrieben: |
also so oder wie:?
Delphi-Quelltext 1: 2: 3: 4:
| procedure TForm.FormCreate (Sender: TObject) begin Label3.Caption := GetUsername; end; | |
:zustimm:
agent_x - Fr 10.08.07 12:25
klappt aber irgend wie nit
arj - Fr 10.08.07 12:31
Hast du im Objektinspektor das Ereignis FormCreate auch der Methode zugewiesen?
Chryzler - Fr 10.08.07 13:48
Klick einfach doppelt auf eine freie Stelle im Formular, und trage dann die Zeile Code in die von Delphi erstellte Prozedur ein.
agent_x - Fr 10.08.07 15:36
danke
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!