Heute hab ich 2 Fragen:

1.Frage: Wie kann ich das Verzeichnis von Temp finden? Normalerweise ist es ja c:\windows\temp, aber wenn jemand windows wo anders installiert hat, kann ich ja nicht diesen Pfad nehmen.

2. Frage: Wie kann ich eine Textbox disablen, so dass sie grau wird, und nicht mehr ansprechbar ist? Muß ich da jetzt sowas schreiben:
Quellcode:
txtName.BackColor = &H8000000F
txtName.Enabled = False

oder gibts da einen Befehl dazu?

Thx @nty

www.premiere-super.de.vu - Premiere Preisvergleich und Sonderangebote!

2.: txtName.Enabled = False müsste schon reichen.

TheTinySteini
Coder Poke646
"Don't Panic" - Hitchhiker's Guide to the Galaxy

dann ist sie aber nicht grau, zuminderst nicht bei mir...

www.premiere-super.de.vu - Premiere Preisvergleich und Sonderangebote!

1. Da gibts ne API für...
Public Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long

2.
txtName.Enabled = false für eine Deaktivierung
txtName.Loced = True wenn nur die Eingabe verhindert werden soll
txtName.BsckColor = xxx wenn man unbedingt graue Eingabefelder braucht

ich geh mal davon aus dass du mit API-Funktionen umgehen kannst...

ich bin ein totaler newbie, kA was APIs sind...
Achja, txtName.Enabled=False macht auch, das man ni´chts eingeben kann...

www.premiere-super.de.vu - Premiere Preisvergleich und Sonderangebote!

ja natürlich verhindert es dass... bei <Locked> kann man aber sonst noch alles mit machen...nur nichts mehr eingeben....

zu den APIs (Funktionen)...
erstell einfach ein Modul ... dort kopierst du dann die Funktion (oben) rein

Der Pfad wird folgendermaßen abgefragt:

Dim Buffer As String
'den Buffer mit einer länge von 255 Zeichen initialisieren
(255 = max. Länge des API-Fnkt. Rückgabewertes)
Buffer = Space(255)
'Der Buffer und seine länge wird an die Funktion übergeben
(Achtung: der rückgabewert ist eine Long-Zahl!)
R& = GetTempPath(Len(Buffer), Buffer)
'Ausgabe des Pfades ...
'Der Pfad wird mit einem Nullbyte abgeschlossen ... da wir den
'aber nicht brauchen holen wir uns nur alles was davor steht....
MsgBox Left(Buffer, InStr(Buffer, Chr(0)) - 1)

---
man kann den Pfad (Buffer) auch verwenden ohne das Nullbyte abzuspalten

Hey, cool, thx Ferdi!
Eine kleine Frage hab ich aber noch: kannst du mir ein beispiel für "alles andere" geben? Was kann man mit Locked machen, was man mit enabled=false nicht machen kann?

Thx @nty

www.premiere-super.de.vu - Premiere Preisvergleich und Sonderangebote!

was ich damit gemeint habe ist dass man den Text immer noch markieren etc.
kann
wenn man "Enabled" auf false setzt geht gar nix mehr...der Text wird grau...
eben deaktiviert...
"locked" hingegenverhindert NUR die eingabe....

eine Typische anwendung für die "locked" Eigenschaft ist z.B die Textfelder bei Installationen in denen das Lizenz-zeugs steht ... mann kann immer noch kopieren und Scrollen...
aber Einfügen und rumtexten ist deaktiviert....
würde man hingegen "enabled" auf False setzten wäre da nicht mehr viel mit anzufangen

temp-verzeichnis
Environ("temp") 'environ gibt die umgebungsvariablen zurück
windir: windowsverzeichnis...
man kann aber auch stadt des strings eine nummer angebn
environ(1), dann gibt er dir die erste umgebungsvariable zurück
mit einer do loop schleife kannst dann auch alle anschaun
bsp
Quellcode:DO
q = q+1
MsgBox(environ(q))
Loop

"Wenn schon Sklave, dann überzeugter Sklave" - Steindl über techn. Zeichner

Thx @ all

www.premiere-super.de.vu - Premiere Preisvergleich und Sonderangebote!