FormLOad

5Rad

Mitglied
Hi,
ich woltl grad mit ner .INI die Farbe meiner Form ändern.
Des mit der .InI tut sowei (mein 1.Versuch stolz bin)
Das Problem ist die Farbe änder es aber nicht
Ich dahcte ich pack das in das Event FormLoad rein ...
gut ich weiß das ist falsch...

Wie muss ich es dann machen kann mir da jemand psl helfen?

lg
Piti
 
Wenn im Form_Load Ereignis z.B. steht:

Code:
Private Sub Form_Load()
   Form1.BackColor = 4711
End Sub

...dann hat die Form eine andere Farbe (hab ich gerade nochmal probiert). Hast Du das Ergebnis Deines Ini-Eintrages auch in eine Zahl umgewandelt (Ini-Einträge werden sonst als String zurück gegeben)?

Grüsse
ronaldh
 
lol ich hab grad en neues "Projekt" gemacht mit dem code von ronaldh des hat funktioniert.
Dann hab ich den Code geommoen und nur den Frame namen geändert und siehe da nichts ging.

Gib es ne eigenschaft die das Frame blockt? Bei Button gibts das des weiß ich!?
Wenn es keine Eigenschaft gibt poste ich mal Code

lg Piti
 
Hey Jungs wollt euch für die vielen Antworten danken,
Das Problem ist gelöst ich hab aber ncihts am Code geändert.

Nach dme Ronaldh mir seine Code geposte that dachte ich mir des muss an der Form Eigenschaft liegen.

Ich hab mir die Form halt neu gebastelt ...
Und nu funktioniert es.

Ich weiß zwar immer noch nicht welche eigenschaft verstellt war aber vielleicht weiß es jemand von euch?!

Code:
File = App.Path & "\Test.ini"
  Sectionschlüssel = "Section1"
 Keyschlüssel = "Key1"
 'Wert "Key1" lesen
 Textschlüssel = INIGetValue(File, Sectionschlüssel, Keyschlüssel)
 Text3 = Len(Textschlüssel)
 'Zeichenfolge, die gesucht werden soll.
 SuchZeichen = "\"
 'Textvergleich ab Position 1
 Pos1 = InStr(1, Textschlüssel, SuchZeichen, 1)  ' liefert 47
 Text3 = Text3 - Pos1
 Pos1 = Pos1 - 1
 Text1 = Left(Textschlüssel, Pos1)
 Text2 = Right(Textschlüssel, Text3)
 frmSplash1.BackColor = Text1

Danke euch
lg Piti
 

Neue Beiträge

Zurück