Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

Der "perfekte" QB-Starter

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Projektvorstellungen
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
Jojo
alter Rang


Anmeldungsdatum: 12.02.2005
Beiträge: 9736
Wohnort: Neben der Festplatte

BeitragVerfasst am: 31.03.2008, 19:21    Titel: Der "perfekte" QB-Starter Antworten mit Zitat

Es mag fast schon dreist sein, das als Projekt hier einzustellen, aber irgendwie ist es ja doch ein Projekt: Der "perfekte" QB-Starter. Hier ist der FB-Sourcecode, der beliebig verändert werden kann:

Code:
#Include "windows.bi"

Const QBPath = "C:\QB4.5\"

Dim As Long RetVal
Dim As String sShortName = Space(256), sTempPath = Space(256)

RetVal = GetShortPathName(Command, sShortName, Len(sShortName))
sShortName = Left(sShortName, RetVal)

RetVal = GetTempPath(Len(sTempPath), sTempPath)
sTempPath = Left(sTempPath, RetVal)

Open sTempPath & "qb.bat" For Output As #1
Print #1, "@echo off"
Print #1, QBPath & "auslast\auslast.com"
Print #1, QBPath & "auslast\auslast2.com"
Print #1, QBPath & "QB.EXE /AH /L" & QBPath & "QB.QLB " & sShortName
Print #1, "del " & sTempPath & "qb.bat"
Close #1

Shell sTempPath & "qb.bat"


Aufgerufen wird der QB-Starter mit lediglich einem Parameter: Die zu öffnende BAS-Datei.
Das BAT-Skript setzt Sebastians Auslast-Patches im Unterordner "auslast" voraus. Wenn die nicht existieren, ist's auch nicht schlimm, aber ihr tut eurem Rechner was Gutes, wenn ihr die dort reinkopiert grinsen
Das Skript lädt QB gleich mit dynamischen Datenfeldern (/AH) und der Standardbilbiothek (/L...QB.QLB) und konvertiert den übergebenen Dateiparameter in ein 8.3-Format um. Somit kann man jetzt BAS-Dateien einfach mit dieser kleinen FreeBasic EXE-Datei verknüpfen und im Hintergrund werden alle wichtigen Befehle ausgeführt!
Viel Spaß!
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.


Zuletzt bearbeitet von Jojo am 05.04.2008, 14:31, insgesamt einmal bearbeitet
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
raph ael



Anmeldungsdatum: 12.04.2006
Beiträge: 472

BeitragVerfasst am: 31.03.2008, 20:27    Titel: Antworten mit Zitat

Vielleicht wäre noch der Befehl
Code:
kb16 gr
nützlich lächeln .
_________________
Zitat:
1000 Yottabytes sind absurd. 640 Yottabytes sollten genug für jeden sein.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
Jojo
alter Rang


Anmeldungsdatum: 12.02.2005
Beiträge: 9736
Wohnort: Neben der Festplatte

BeitragVerfasst am: 31.03.2008, 20:34    Titel: Antworten mit Zitat

Pff, wer hat schon Vista... durchgeknallt
Das Programm hab ich in erster Linie für mich geschrieben (deswegen lässst sich das Programm auch nur durch Neukompilieren ändern), aber ich hab ja den Sourcecode gepostet, dass jeder solche Sache selber einbauen kann. zwinkern
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Ferdi



Anmeldungsdatum: 10.03.2007
Beiträge: 284
Wohnort: Berlin

BeitragVerfasst am: 05.04.2008, 14:10    Titel: Antworten mit Zitat

Jojo hat Folgendes geschrieben:
Pff, wer hat schon Vista... durchgeknallt
Das Programm hab ich in erster Linie für mich geschrieben (deswegen lässst sich das Programm auch nur durch Neukompilieren ändern), aber ich hab ja den Sourcecode gepostet, dass jeder solche Sache selber einbauen kann. zwinkern


Ich!!!!
Gibt es auch ne .EXE
Sry aber ich hab kein FB und weiß auch nicht wie ich sowas compilen soll.
_________________
Dieser Post wurde cum grano salis gewürzt! Na dann: Guten Appetit!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Jojo
alter Rang


Anmeldungsdatum: 12.02.2005
Beiträge: 9736
Wohnort: Neben der Festplatte

BeitragVerfasst am: 05.04.2008, 14:24    Titel: Antworten mit Zitat

http://www.freebasic-portal.de/index.php?s=tutorials&cat=1 mit den Augen rollen
Es gibt keine kompilierte Version, da alle Dateipfade hardgecodet sind und somit die EXE-Version auf vielen Systemen nicht funktionieren würde.

Und Vista suckt...
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
raph ael



Anmeldungsdatum: 12.04.2006
Beiträge: 472

BeitragVerfasst am: 05.04.2008, 14:39    Titel: Antworten mit Zitat

http://raphaelr.kilu.de/temp/qbstarter.zip
Hab ihn mal flexiblisiert cool .
_________________
Zitat:
1000 Yottabytes sind absurd. 640 Yottabytes sollten genug für jeden sein.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
Jojo
alter Rang


Anmeldungsdatum: 12.02.2005
Beiträge: 9736
Wohnort: Neben der Festplatte

BeitragVerfasst am: 05.04.2008, 15:47    Titel: Antworten mit Zitat

Warum hast du den DEL-Befehl auskommentiert?! Willst du Datenmüll hinterlassen...?
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
raph ael



Anmeldungsdatum: 12.04.2006
Beiträge: 472

BeitragVerfasst am: 05.04.2008, 15:54    Titel: Antworten mit Zitat

Uuupsss...
Den hab ich fürs Debuggen auskommentiert und dann wieder vergessen ihn zu entkommentieren verlegen .
_________________
Zitat:
1000 Yottabytes sind absurd. 640 Yottabytes sollten genug für jeden sein.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Projektvorstellungen Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz