13. april 2004 - 09:07
Der er
6 kommentarer og 1 løsning
Variabel i Objekt-navn
Jeg har fx 3 Pictures: imgMainpicture (i formen frmConfig) imgMainpicture_DK (i formen ImageBuffer) imgMainpicture_UK (i formen ImageBuffer) Jeg vil så gerne lave en funktion der kan skifte imellem de 2 forskellige sprog. Den skulle fx se noget i stil med det her ud: Public Function ChangeLanguage(Lng As String) Dim ImgName As String ImgName = "imgMainpicture_" & Lng frmConfig.imgMainpicture.Picture = ImageBuffer.ImgName.Picture End Function -men det virker ikke.... hvad kan jeg gøre?
Annonceindlæg tema
Offentlig digitalisering
Fra effektivisering til digital suverænitet. Hvordan skaber det offentlige en digital fremtid med AI, sikkerhed og kontrol i centrum?
13. april 2004 - 11:05
#1
du skal have defineret din ImgName som et picture (hvis det er et picture objekt du bruger) og derved kan du benytte det på den måde du ønsker...
13. april 2004 - 11:25
#2
Øhh - ikke sikker på jeg forstår/er enig med hiks. Det ville jo hjælpe betydeligt, hvis du fortalte om FEJLBESKEDEN eller hvad der går galt! A. Prøv at test om dette virker: frmConfig.imgMainpicture.Picture = ImageBuffer.imgMainpicture_UK.Picture Virker det? Hvis ja, så kan jeg godt strikke en løsning til dig. B. Hvis det ikke virker, virker dette så? frmConfig.imgMainpicture.Picture = loadpicture(ImageBuffer.imgMainpicture_UK.Picture) C. Men kan du ikke bare bruge den rigtige sti til billedfilen - altså frmConfig.imgMainpicture.Picture = loadpicture(app.path & "\Mainpicture_UK.jpg")
13. april 2004 - 11:26
#3
Ahh - nu fatter jeg hiks :o) Virker det egentligt - at skrive Dim ImgName As Picture 'Eller hvad for en tuype det nu er?
13. april 2004 - 16:16
#4
ja det burde det men du skal stadig bruge din c til at fuldføre det, hvis det er billedet der er variabelt og ikke billede-objektet på formen der er tilføjet... /hiks
13. april 2004 - 16:17
#5
men jeg forstod det som billede-objektet kan godt se det hvis det er selve billedfilen... /hiks
14. april 2004 - 23:08
#6
hvad med: Public Function ChangeLanguage(Lng As String) Dim ImgName As String ImgName = "imgMainpicture_" & Lng frmConfig.imgMainpicture.Picture = ImageBuffer(ImgName).Picture End Function
09. december 2004 - 15:58
#7
lukker
Kurser inden for grundlæggende programmering