Der Gambas Club

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...

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...

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

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...

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...

Mit Mouse-Event "_MouseDown( )" von "Gambas" ist es nicht möglich.

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...

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".

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:

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...

How to read value of pixel color in drawingarea ? A way (only Gambas resources) could be: :| 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 ...

Hello, here a my simple code to play MP3 audio file by using MediaPipeline and MediaControl Classes of gb.media Component. Public Sub Main() Dim pl As MediaPipeline Dim src, dcd, snk As MediaControl Dim fileMP3 As String Dim dur, i As Integer Dim tm As Date fileMP3 = "/path/of/file.mp3" If Not Exist...

gambi hat geschrieben: ↑

Mo 14. Aug 2017, 15:10

Isn't it funny that two projects at the same time deal with ZBAR?

Yes, it is.
You and me seem like pioneers about it.

Ciao

Hello gambi, Maybe you saw my little project Gambas-Food-Info No, I did not see that your project. But now I have downloaded it. ... in my project, I added some lines: Excuse me, I don't understand :? the addition of those lines, because - if I'm not wrong - your project does not use gb.media Compon...

Hello, here a code, I wrote, to read barcodes by using a webcam with gb.media Component: Private pl As MediaPipeline Private tb As ToggleButton Private drar As DrawingArea Public Sub _new() With Me .W = 600 .H = 600 End With drar = New DrawingArea(Me) drar.Background = Color.Transparent With tb = Ne...