Die Suche ergab 93 Treffer

von vuott
So 16. Feb 2020, 14:33
Forum: Programmierung
Thema: Color wie komme ich von Interger zu den Farben?
Antworten: 11
Zugriffe: 80

Re: Color wie komme ich von Interger zu den Farben?

gambasso hat geschrieben:
So 16. Feb 2020, 11:55
Was für eine Farbe ist der zahl 6357247 zugeordnet? Wie komme ich dahin?
Um die hexadezimale darstellung einer dezimalzahl zu erhalten, müssen sie die Funktion verwenden Hex( ):

http://gambaswiki.org/wiki/lang/hex
von vuott
Sa 15. Feb 2020, 23:40
Forum: Programmierung
Thema: Color wie komme ich von Interger zu den Farben?
Antworten: 11
Zugriffe: 80

Re: Color wie komme ich von Interger zu den Farben?

Was ist der verwendete Code?
von vuott
Mi 8. Jan 2020, 16:05
Forum: Multimedia
Thema: Audiodaten in Echtzeit mit gb.openal lesbar?
Antworten: 2
Zugriffe: 162

Re: Audiodaten in Echtzeit mit gb.audioal lesbar?

Ehmmm... vielleicht meinst du "gb.openal" ?
von vuott
Mi 4. Sep 2019, 10:38
Forum: Programmierung
Thema: Wie bekomme ich ein Image Tranparent ?
Antworten: 12
Zugriffe: 466

Re: Wie bekomme ich ein Image Tranparent ?

gambasso hat geschrieben:
Di 3. Sep 2019, 13:07
Dieses 3.Image, bzw. 3.ScrollArea bekomme ich nicht transparent. Warum weiß ich nicht.
Können Sie ein kurzes Programm anhängen, das dieses Problem reproduziert?
von vuott
Mo 2. Sep 2019, 14:53
Forum: Programmierung
Thema: Wie bekomme ich ein Image Tranparent ?
Antworten: 12
Zugriffe: 466

Re: Wie bekomme ich ein Image Tranparent ?

Hello. Ja, ich erinnere mich, dass du gesagt hast, du hättest zwei ScrollArea. Private im1 As Image Private im2 As Image Public Sub Form_Open() im1 = Image.Load("/..../..../file_image.xxx") ' Erstellt ein "transparent image": ↘ im2 = New Image(ScrollArea2.W, ScrollArea2.H, Color.Transparent, Image.S...
von vuott
So 1. Sep 2019, 23:58
Forum: Programmierung
Thema: Wie bekomme ich ein Image Tranparent ?
Antworten: 12
Zugriffe: 466

Re: Wie bekomme ich ein Image Tranparent ?

...eine kleine variation von cogier code: Public Sub ScrollArea1_Draw() Dim iImage0 As Image = Image.Load(Application.Path &/ "pict1.jpg") With Paint .Begin(iImage0) .Brush = .Color(Color.Red) .LineWidth = 8.0 .Ellipse(iImage0.W / 12, iImage0.H / 12, 350, 350) .Stroke .End End With With Paint .DrawI...
von vuott
Do 25. Jul 2019, 23:59
Forum: Programmierung
Thema: Textbox (massive Probleme) und ich seh den Wald nicht
Antworten: 8
Zugriffe: 450

Re: Textbox (massive Probleme) und ich seh den Wald nicht

Do4kgt hat geschrieben:
Do 25. Jul 2019, 21:00
Die Rot Makierten Zeilen würde ich gerne in die jeweilige Textbox zuweisen.

Z.b
Callsign in Textbox 1
ID in Textbox 2 und so weiter.
Wenn die textelemente immer gleich sind, können sie die funktion Scan( ) verwendene.
von vuott
Sa 19. Jan 2019, 14:22
Forum: Programmierung
Thema: Bilder resize
Antworten: 4
Zugriffe: 477

Re: Bilder resize

Entschuldige, ich verstehe das nicht: warum 28000 ?
von vuott
Do 29. Nov 2018, 17:34
Forum: Programmierung
Thema: Spinbox.value mit Label.text vergleichen
Antworten: 6
Zugriffe: 799

Re: Spinbox.value mit Label.text vergleichen

Hello,

about the attachment: I do not understand why, if I want download it, I obtain this notice:

" The selected attachment does not exist anymore. "

:?
von vuott
Di 13. Nov 2018, 09:30
Forum: Programmierung
Thema: DrawingArea als Bitmap speichern
Antworten: 2
Zugriffe: 500

Re: DrawingArea als Bitmap speichern

Hello, an example: Public Sub Form_Open() With DrawingArea1 .Background = Color.White .W = 300 .H = 40 End With End Public Sub DrawingArea1_Draw() Dim c As Integer[] = [Color.Blue, Color.Green, Color.Yellow, Color.Red] Dim p As Float[] = [0, 0.34, 0.67, 1] With Paint .Brush = .LinearGradient(0, 0, D...
von vuott
Sa 11. Aug 2018, 15:03
Forum: Programmierung
Thema: wie kriege ich das vom Programm ausgelesen?
Antworten: 12
Zugriffe: 2094

Re: wie kriege ich das vom Programm ausgelesen?

This should happen automatically, without having to enter them before Maybe do you want to obtain the Constants of Printer Class ? :| Print Printer1.A4 Moreover, if you want to see symbols of Printer Class: Public Sub Form_Open() Dim s As String For Each s In Class.Load("Printer").Symbols Print s N...
von vuott
Fr 10. Aug 2018, 20:10
Forum: Programmierung
Thema: wie kriege ich das vom Programm ausgelesen?
Antworten: 12
Zugriffe: 2094

Re: wie kriege ich das vom Programm ausgelesen?

gambasso hat geschrieben:
Fr 10. Aug 2018, 18:37
I would like to read the properties and the values in the program.
Ehmmmm..... Vergib uns, aber wir verstehen nicht, was du willst genau. :|
von vuott
Mi 8. Aug 2018, 22:28
Forum: Programmierung
Thema: wie kriege ich das vom Programm ausgelesen?
Antworten: 12
Zugriffe: 2094

Re: wie kriege ich das vom Programm ausgelesen?

Hello gambasso,
you have to use directly Printer Class, not its variable.

Ad exemplum: gambas code
Public Sub Form_Open()

  Dim pr As New Printer

  Print pr.Default   ' <------------------- THIS RETURNS AN ERROR !

  Print Printer.Default   ' <------------ this is OK !

End
von vuott
Di 7. Aug 2018, 15:23
Forum: Multimedia
Thema: Ist gb stumm?
Antworten: 4
Zugriffe: 4190

Re: Ist gb stumm?

If you want not to use audio file, you can try this code by activating gb.openal Component: Private Const AMPIEZZA As Byte = 127 Private Const FREQUENZA As Short = 880 Private Const CAMPIONAMENTO As Integer = 44100 Private Const DURATA As Single = 0.15 Public Sub Main() Dim disp As AlcDevice Dim con...