Die Suche ergab 82 Treffer

von vuott
Sa 11. Aug 2018, 15:03
Forum: Programmierung
Thema: wie kriege ich das vom Programm ausgelesen?
Antworten: 12
Zugriffe: 242

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: 242

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: 242

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: 2589

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...
von vuott
Fr 20. Jul 2018, 12:38
Forum: Programmierung
Thema: wie mehrere Button-BackGround ändern, wie ?
Antworten: 8
Zugriffe: 258

Re: wie mehrere Button-BackGround ändern, wie ?

Hello,

Gianluigi, from italian gambas forum, suggests you this example-program:

https://sourceforge.net/projects/qt5ct/
von vuott
Mo 16. Apr 2018, 00:01
Forum: Multimedia
Thema: Gambas vs. BlitzMax vs. FreeBasic
Antworten: 7
Zugriffe: 897

Re: Gambas vs. BlitzMax vs. FreeBasic

SFML wäre sehr, sehr gut da sehr neu, sehr schnell, sehr einfach und sehr gut :!: Hello, Gambas offers you the possibility, however, to use functions belonging to external libraries. E.g. about SFML: http://www.gambas-it.org/wiki/index.php?title=Eseguire_un_file_audio_ed_estrarne_informazioni_media...
von vuott
Di 13. Mär 2018, 16:14
Forum: Multimedia
Thema: Sound vom Mikrofon in eine Datei speichern
Antworten: 6
Zugriffe: 1047

Re: Sound vom Mikrofon in eine Datei speichern

Hello, some suggestion from italian Gambas Wiki: http://www.gambas-it.org/wiki/index.php?title=Registrare_il_sonoro_da_una_fonte_esterna_e_salvarlo_in_un_file_audio_mediante_il_Componente_gb.media http://www.gambas-it.org/wiki/index.php?title=Registrare_e_salvare_in_un_file_WAV_una_fonte_audio_ester...
von vuott
Sa 3. Mär 2018, 15:30
Forum: Allgemeines
Thema: Ancient Poseidònia (Paestum) under the snow
Antworten: 2
Zugriffe: 786

Re: Ancient Poseidònia (Paestum) under the snow

gambi hat geschrieben:
Do 1. Mär 2018, 22:34
Snow is rather unusual for this region, isn't it?
Hello gambi,
if you about "region" mean "place", "zone", you are right, because Paestum archaeological area is near the sea.
If you mean Kampanien Region, a few kilometers, on the Apennines, it snows a lot.

bye
von vuott
Di 27. Feb 2018, 16:45
Forum: Allgemeines
Thema: Ancient Poseidònia (Paestum) under the snow
Antworten: 2
Zugriffe: 786

Ancient Poseidònia (Paestum) under the snow

Hello, I know german people loves so much the antiquities; well, I'ld like to share with you this beautiful video about the archaeological site of the ancient Greek city of Poseidònia (Paestum - south Italy) in these days under the snow: https://video.repubblica.it/edizione/napoli/paestum-il-fascino...
von vuott
So 15. Okt 2017, 16:21
Forum: Programmierung
Thema: File management - Write
Antworten: 3
Zugriffe: 1095

Re: File management - Write

As every row is a text-string, you should use " string " functions. Here a very little and simple example (it erases oldest row, if the rows > 8 ). I considered that every line in your file consists of 16 ASCII characters. Public Sub Main() Dim s As String Dim b As Byte ' it creates a new clean text...
von vuott
Di 10. Okt 2017, 18:00
Forum: Programmierung
Thema: Mouse Down auf Screen
Antworten: 10
Zugriffe: 3228

Re: Mouse Down auf Screen

Mit Mouse-Event "_MouseDown( )" von "Gambas" ist es nicht möglich. :|
von vuott
Di 10. Okt 2017, 08:34
Forum: Programmierung
Thema: Mouse Down auf Screen
Antworten: 10
Zugriffe: 3228

Re: Mouse Down auf Screen

Hello. wenn ich die Maus abfragen will, kommt die Fehlermeldung: No Mouse Event Data :? ...aber haben Sie meinen Code ausschließlich versucht? Wie frage ich dabei ein Mausklick ab, wenn der Mauszeiger sich irgendwo auf dem Desktop befindet? Nicht mit Gambas Maus- Ereignissen . Meiner Meinung nach nu...
von vuott
Mo 9. Okt 2017, 19:21
Forum: Programmierung
Thema: Mouse Down auf Screen
Antworten: 10
Zugriffe: 3228

Re: Mouse Down auf Screen

gambasso hat geschrieben:
Mo 9. Okt 2017, 15:44
Wie bekomme ich Werte vom gesamten Desktop?
Sie müssen auf das Fenster klicken (...selbst der Desktop ist ein "Fenster").
Auf diese weise, das Fenster wird also aktuellen "ActiveWindow".
von vuott
Mo 9. Okt 2017, 11:56
Forum: Programmierung
Thema: Mouse Down auf Screen
Antworten: 10
Zugriffe: 3228

Re: Mouse Down auf Screen

es geht leider nicht. Fehler bei > 'Private dw As DesktopWindow' und weiteren 'Window' -Code. Sie müssen die Komponenten aktivieren: gb.desktop und gb.desktop.x11 Nur mit dem Maus-Klick nicht. Nur man darf kein Maus-Klick auslösen. ...sie sollten das Maus- file-device behandeln. :roll:
von vuott
Mo 9. Okt 2017, 00:41
Forum: Programmierung
Thema: Mouse Down auf Screen
Antworten: 10
Zugriffe: 3228

Re: Mouse Down auf Screen

Hello gambasso, Ich weiß nicht, wenn ich gut verstanden habe. :oops: Ich schlage vor: Private dw As DesktopWindow Private tempus As Timer Private pc As Picture Public Sub Form_Open() With tempus = New Timer As "Tempus" .Delay = 1000 .Start() End With End Public Sub Tempus_Timer() Dim aw As Integer a...