Flash, swf per include aufrufen?

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
udg
Beiträge: 566
Registriert: 20.06.2013 23:27

Flash, swf per include aufrufen?

Beitrag von udg »

Guten Tag euch.
Ich habe hier ein Flash swf stand alone. Dieses kann man ja Problemlos in einem WebGadget aufrufen.

Gibt es aber auch die Möglichkeit, per IncludeBinary das SWF später in die exe zu integrieren, sodass man es nicht mehr von externer Quelle bzw. URL "callen" braucht?

so etwas in der Art?

Code: Alles auswählen

WebGadget(#Webgadget, 2, 268, 1021, 450, ?swftool)
Danke für einen Tipp / Lösung.
PB v5.43 LTS + v6.02 LTS | Windows 7 x86 + 11 x64 - Gforce RTX 4090 - AMD Ryzen 9 5900X 12-Core Processor 4.2 GHz - 64,0 GB RAM,
ASUSTEK TUF Gaming X570 Plus
ASUS ROG Thor-1200P Platinum (1200W, Aura Sync, OLED Display, 0dB-Cooling)
1x 1 TByte Samsung MZ-V7S500BW 970 EVO Plus 1 TB NVMe M.2 Internal SSD
1x 2 TByte Samsung MZ-V7S2T0BW 970 EVO Plus 2 TB NVMe M.2 Internal SSD
von BiSONTE!. Kauft Hardware gern bei ihm.
Monitor:
LG 38GL950G-B 95 (38 Zoll) Ultragear Curved 21: 9 UltraWide QHD IPS
Benutzeravatar
udg
Beiträge: 566
Registriert: 20.06.2013 23:27

Re: Flash, swf per include aufrufen?

Beitrag von udg »

Da es keine komplette Lösung zu geben scheint habe ich es so gelöst:
- danke für den Denkanstoß, PadMan

Code: Alles auswählen


(...)
;{ SWF
  swf:
  IncludeBinary "gfx\chromat.swf"
  swfend:
  EndDataSection          
;}

Procedure SWFextract(fileName.s)
    If CreateFile(1, fileName)          ; create file
       L1 = ?swfend - ?swf             ; get size by included binary
       WriteData(1, ?swf, L1)          ; write to file
       CloseFile(1)                         ; close file
    EndIf
  ProcedureReturn 1
EndProcedure

hWnd =  OpenWindow(0, 732, 301, 1024, 770, "", #PB_Window_ScreenCentered | #PB_Window_BorderLess)

      ; Here start: Webgadget
       temp$ = GetTemporaryDirectory()              ; returns the path of the temp directory
       SWFextract(temp$+"chromat.swf")             ; extract the file there
       WebGadget(#Webgadget, 140, 268, 750, 450, "file://"+Temp$+"chromat.swf") ; load swf into WebGadget

(...)

; Main
;-EXIT BUTTON FUNCTION
          Case #Btn_Exit
            DeleteFile(temp$+"chromat.swf")          ; delete file from temp dir on exit
            End
(...)

PB v5.43 LTS + v6.02 LTS | Windows 7 x86 + 11 x64 - Gforce RTX 4090 - AMD Ryzen 9 5900X 12-Core Processor 4.2 GHz - 64,0 GB RAM,
ASUSTEK TUF Gaming X570 Plus
ASUS ROG Thor-1200P Platinum (1200W, Aura Sync, OLED Display, 0dB-Cooling)
1x 1 TByte Samsung MZ-V7S500BW 970 EVO Plus 1 TB NVMe M.2 Internal SSD
1x 2 TByte Samsung MZ-V7S2T0BW 970 EVO Plus 2 TB NVMe M.2 Internal SSD
von BiSONTE!. Kauft Hardware gern bei ihm.
Monitor:
LG 38GL950G-B 95 (38 Zoll) Ultragear Curved 21: 9 UltraWide QHD IPS
Benutzeravatar
udg
Beiträge: 566
Registriert: 20.06.2013 23:27

Re: Flash, swf per include aufrufen?

Beitrag von udg »

wen es mal interessiert, dem habe ich die kompilierte exe hier angehangen.

bin zwar noch nicht fertig aber läuft schon gut. muss nur noch das mit dem fullscreen richtig anpassen.

Screenshot:
Bild


Logo Creator exe hier:
Link erneuert:
Download: Logo Creator Beta

grüße
Zuletzt geändert von udg am 13.05.2016 03:18, insgesamt 2-mal geändert.
PB v5.43 LTS + v6.02 LTS | Windows 7 x86 + 11 x64 - Gforce RTX 4090 - AMD Ryzen 9 5900X 12-Core Processor 4.2 GHz - 64,0 GB RAM,
ASUSTEK TUF Gaming X570 Plus
ASUS ROG Thor-1200P Platinum (1200W, Aura Sync, OLED Display, 0dB-Cooling)
1x 1 TByte Samsung MZ-V7S500BW 970 EVO Plus 1 TB NVMe M.2 Internal SSD
1x 2 TByte Samsung MZ-V7S2T0BW 970 EVO Plus 2 TB NVMe M.2 Internal SSD
von BiSONTE!. Kauft Hardware gern bei ihm.
Monitor:
LG 38GL950G-B 95 (38 Zoll) Ultragear Curved 21: 9 UltraWide QHD IPS
Benutzeravatar
RSBasic
Admin
Beiträge: 8047
Registriert: 05.10.2006 18:55
Wohnort: Gernsbach
Kontaktdaten:

Re: Flash, swf per include aufrufen?

Beitrag von RSBasic »

Sieht sehr gut aus und damit kann man echt gute Schriften erstellen. :allright:
Aus privaten Gründen habe ich leider nicht mehr so viel Zeit wie früher. Bitte habt Verständnis dafür.
Bild
Bild
Benutzeravatar
udg
Beiträge: 566
Registriert: 20.06.2013 23:27

Re: Flash, swf per include aufrufen?

Beitrag von udg »

Besten Dank. Weiß ich sehr zu schätzen :)
PB v5.43 LTS + v6.02 LTS | Windows 7 x86 + 11 x64 - Gforce RTX 4090 - AMD Ryzen 9 5900X 12-Core Processor 4.2 GHz - 64,0 GB RAM,
ASUSTEK TUF Gaming X570 Plus
ASUS ROG Thor-1200P Platinum (1200W, Aura Sync, OLED Display, 0dB-Cooling)
1x 1 TByte Samsung MZ-V7S500BW 970 EVO Plus 1 TB NVMe M.2 Internal SSD
1x 2 TByte Samsung MZ-V7S2T0BW 970 EVO Plus 2 TB NVMe M.2 Internal SSD
von BiSONTE!. Kauft Hardware gern bei ihm.
Monitor:
LG 38GL950G-B 95 (38 Zoll) Ultragear Curved 21: 9 UltraWide QHD IPS
Antworten