Suche XbToolsIII Version 1.8
Moderator: Moderatoren
Suche XbToolsIII Version 1.8
Wer kann mir die XbToolsIII Version 1.8 zur Verfügung stellen oder Vekaufen oder kann mir eine Bezugsquelle nennen ?
Alaska ist leider nicht inder Lage eine Version 1.8 zur Verkaufen.
Würden die XbToolIII 1.9 auch unter Xbase++ 1.8 laufen?
Gruß Johann der Suchende
Alaska ist leider nicht inder Lage eine Version 1.8 zur Verkaufen.
Würden die XbToolIII 1.9 auch unter Xbase++ 1.8 laufen?
Gruß Johann der Suchende
- AUGE_OHR
- Marvin
- Beiträge: 12906
- Registriert: Do, 16. Mär 2006 7:55
- Wohnort: Hamburg
- Hat sich bedankt: 19 Mal
- Danksagung erhalten: 45 Mal
Re: Suche XbToolsIII Version 1.8
hi,
verkaufen kann ...
welche Funktionen brauchst du denn .. vieles kann man ja selbst
machen.
hm ... "Ersatzteile" sollte man doch irgendwo rumliegen die manmatyschik hat geschrieben: Alaska ist leider nicht inder Lage eine Version 1.8 zur Verkaufen.
verkaufen kann ...
welche Funktionen brauchst du denn .. vieles kann man ja selbst
machen.
gruss by OHR
Jimmy
Jimmy
- Jan
- Marvin
- Beiträge: 14651
- Registriert: Fr, 23. Sep 2005 18:23
- Wohnort: 49328 Melle
- Hat sich bedankt: 21 Mal
- Danksagung erhalten: 88 Mal
- Kontaktdaten:
Johann,
brauchst Du wirklich die 1.8 oder die 1.82?
Abgesehen davon: Wie Jimmy schon ganz richtig sagte: Die meisten Funktionen aus den Tools kann man sich auch selber schreiben. Ist halt nur ein wenig mehr Auffwand Deswegen setze ich die ab und an doch auch mal ein. Sind halt bei der Subscription automatisch dabei. Deswegen habe ich mir die auch nie gekauft.
Jan
brauchst Du wirklich die 1.8 oder die 1.82?
Abgesehen davon: Wie Jimmy schon ganz richtig sagte: Die meisten Funktionen aus den Tools kann man sich auch selber schreiben. Ist halt nur ein wenig mehr Auffwand Deswegen setze ich die ab und an doch auch mal ein. Sind halt bei der Subscription automatisch dabei. Deswegen habe ich mir die auch nie gekauft.
Jan
- Rolf Ramacher
- Der Entwickler von "Deep Thought"
- Beiträge: 1930
- Registriert: Do, 09. Nov 2006 10:33
- Wohnort: Bergheim
- Danksagung erhalten: 3 Mal
- Kontaktdaten:
- AUGE_OHR
- Marvin
- Beiträge: 12906
- Registriert: Do, 16. Mär 2006 7:55
- Wohnort: Hamburg
- Hat sich bedankt: 19 Mal
- Danksagung erhalten: 45 Mal
hi,
Beispiel für "Ersatz" : in den Tools sind ja Novell (Bindery) Funktionen.
Wie im Helpfile der Tools zu lesen wird aber zum Einsatz der Funktionen
ein Novell-Client (for Windows) benötigt. In Wirklichkeit wird damit nur
die Prtwin32.dll benötigt :
nochmals die Frage WAS aus den Tools du suchst ?matyschik hat geschrieben: Gruß Johann der suchende
Beispiel für "Ersatz" : in den Tools sind ja Novell (Bindery) Funktionen.
Wie im Helpfile der Tools zu lesen wird aber zum Einsatz der Funktionen
ein Novell-Client (for Windows) benötigt. In Wirklichkeit wird damit nur
die Prtwin32.dll benötigt :
Code: Alles auswählen
Source "irgendwo" im Alaska Forum gefunden ...
#INCLUDE "OS.CH"
#INCLUDE "COMMON.CH"
#INCLUDE "DLL.CH"
#DEFINE CAP_SET_SUPP_FF 1
#DEFINE CAP_SET_BANNER 2
STATIC lIsNovell, nDLL
DLLFUNCTION NWSetCaptureFlags( nHandle, nLpt, @cFlags) USING STDCALL FROM CALWIN32.DLL
DLLFUNCTION NWGetCaptureFlags( nLpt, @cFlags1, @cFlags2) USING STDCALL FROM CALWIN32.DLL
DLLFUNCTION NWCallsInit( nNull1, nNull2 ) USING STDCALL FROM CALWIN32.DLL
DLLFUNCTION NWGetDefaultConnectionID( @nHandle ) USING STDCALL FROM CALWIN32.DLL
INIT PROCEDURE InitNovFunc
LOCAL cDir
lIsNovell := .F.
// Je nach OS-Familie andere Einstellungen verwenden
IF OS(OS_FAMILY) == "WINNT"
cDir := TRIM(GetEnv("systemroot")) + "\system32"
ELSE
cDir := TRIM(GetEnv("winbootdir")) + "\system"
ENDIF
IF FEXISTS(cDir + "\prtwin32.dll")
nDll := DLLLoad("prtwin32.dll")
lIsNovell := (nDll # 0)
ENDIF
RETURN
FUNCTION IsNovell
RETURN lIsNovell
FUNCTION CnetCapBeg( nLPT_Port )
LOCAL lRet := .F.
IF lIsNovell
// lRet := &("NnetCapBeg")( nLPT_Port )
lRet := DllCall( nDll,, "NNETCAPBEG", nLPT_Port )
ENDIF
RETURN lRet
FUNCTION CnetCapEnd( nLPT_Port )
LOCAL lRet := .T.
IF lIsNovell
// lRet := &("NnetCapEnd")( nLPT_Port )
lRet := DllCall( nDll,, "NNETCAPEND", nLPT_Port )
ENDIF
RETURN lRet
FUNCTION CnetCapAct( nLPT_Port )
LOCAL lRet := .T.
IF lIsNovell
// lRet := &("NnetCapEnd")( nLPT_Port )
lRet := DllCall( nDll,, "NNETCAPACT", nLPT_Port )
ENDIF
RETURN lRet
FUNCTION CnetCapSsf( nLPT_Port, lEjectAtEndOfJob, lPrintBannerPage, ignored_1, ignored_2, nTabWidth, nCopies, nFormNumber )
LOCAL lRet := .F.
IF lIsNovell
lRet := DllCall( nDll,, "NNETCAPSSF", nLPT_Port, , .F. , ignored_1, ignored_2, nTabWidth, nCopies, nFormNumber )
IF lEjectAtEndOfJob != NIL
NNetSetCaptureFlags( !lEjectAtEndOfJob, CAP_SET_SUPP_FF )
ENDIF
IF lPrintBannerPage != NIL
NNetSetCaptureFlags( lPrintBannerPage, CAP_SET_BANNER )
ENDIF
ENDIF
RETURN lRet
FUNCTION CnetScnBin( cScanObjectName, nObjectType, nObjectID, nObjectFlag, nObjectSecurity, lObjectHasProperty, cFileServer )
LOCAL aRet := {}
IF lIsNovell
// aRet := &("CnetScnBin")( cScanObjectName, nObjectType, nObjectID, nObjectFlag, nObjectSecurity, lObjectHasProperty, cFileServer )
aRet := DllCall( nDll,, "NNETSCNBIN", cScanObjectName, nObjectType, nObjectID, nObjectFlag, nObjectSecurity, lObjectHasProperty, cFileServer )
ENDIF
RETURN aRet
FUNCTION CnetSDate( cFileServer )
LOCAL dRet := DATE()
IF lIsNovell
// dRet := &("NnetSDate")( cFileServer )
dRet := DllCall( nDll,, "NNETSDATE", cFileServer )
ENDIF
RETURN dRet
FUNCTION CnetSerNo( cFileServer )
LOCAL cRet := ""
IF lIsNovell
// cRet := &("NnetSerno")( cFileServer )
cRet := DllCall( nDll,, "NNETSERNO", cFileServer )
ENDIF
RETURN cRet
FUNCTION CnetSetQ( nLPT_Port, cPrintQueueName )
LOCAL lRet := .F.
IF lIsNovell
// lret := &("NnetSetQ")( nLPT_Port, cPrintQueueName )
lret := DllCall( nDll,, "NNETSETQ", nLPT_Port, cPrintQueueName )
ENDIF
RETURN lRet
FUNCTION CnetBanner(cBannerName)
LOCAL cRet := ""
IF lIsNovell
cRet := DllCall( nDll,, "NNETBANNER", cBannerName )
ENDIF
RETURN cRet
FUNCTION CnetSetSrv( cFileserverName )
LOCAL lRet := .F.
IF lIsNovell
// lRet := &("NnetSetSrv")( cFileserverName )
lRet := DllCall( nDll,, "NNETSETSRV", cFileserverName )
ENDIF
RETURN lRet
FUNCTION CnetSlist()
LOCAL cRet := ""
IF lIsNovell
// cRet := &("NnetSlist")()
cRet := DllCall( nDll,, "NNETSLIST")
ENDIF
RETURN cRet
FUNCTION CnetStaId()
LOCAL cRet := ""
IF lIsNovell
// cRet := &("NnetStaId")()
cRet := DllCall( nDll,, "NNETSTAID")
ENDIF
RETURN cRet
FUNCTION CnetStime()
LOCAL cRet := TIME()
IF lIsNovell
// cRet := &("NnetStime")()
cRet := DllCall( nDll,, "NNETSTIME")
ENDIF
RETURN cRet
FUNCTION CnetWork()
LOCAL lRet := .F.
IF lIsNovell
// lret := &("NNETWORK")()
lret := DllCall( nDll,, "NNETWORK")
ENDIF
RETURN lRet
FUNCTION CnetCVsSrv( cSearchServerName )
LOCAL nRet := 0
DEFAULT cSearchServerName TO "*"
IF lIsNovell
nret := DllCall( nDll,, "NNETCVSSRV", cSearchServerName)
ENDIF
RETURN nRet
FUNCTION CnetSname()
LOCAL cRet := ""
IF lIsNovell
cret := DllCall( nDll,, "NNETSNAME" )
ENDIF
RETURN cRet
FUNCTION CnetCCnSrv(lLoggedin)
LOCAL nRet := 0
DEFAULT lLoggedIn TO .F.
IF lIsNovell
nRet := DllCall( nDll,, "NNETCCNSRV", lLoggedin )
ENDIF
RETURN nRet
/*
Aufbau der Struktur f
gruss by OHR
Jimmy
Jimmy
-
- Rekursionen-Architekt
- Beiträge: 101
- Registriert: Di, 22. Jul 2008 15:39
- Wohnort: RE - NRW
- Kontaktdaten:
Da es hier um de XbToolsIII geht .... gibt es die als Demo passend zu Xbase 1.9 Build 331 ? Gehe ich richtig in der Annahm, dass darin viele/ähnliche UDFs enthalten sind, wie damals in der NT250.lib bzw der CA Tools II v5.x? Aus der habe ich nämlich ettliche UDFs verwendet und das alles manuell nachzuproggen ... ohje... ohje....
Da ich mich ja noch in der ´Übrlegungs + Testpase´ mit der Migrierung befinde, möchte ich nicht zum jetzigen Zeitpunkt bereits hunderte Teuros ausgeben. Ich muss mir erst sicher sein bzw. genauer eroieren, was an Arbeit/Zeit/Schweiß usw. drauf geht, wenn ich meine Applikation tatsächlich komplett migriere.
EditON
Hat sich erledigt. XbToolsIII gibt es nicht als Demo. Schade, schade, schade.
EditOFF
Da ich mich ja noch in der ´Übrlegungs + Testpase´ mit der Migrierung befinde, möchte ich nicht zum jetzigen Zeitpunkt bereits hunderte Teuros ausgeben. Ich muss mir erst sicher sein bzw. genauer eroieren, was an Arbeit/Zeit/Schweiß usw. drauf geht, wenn ich meine Applikation tatsächlich komplett migriere.
EditON
Hat sich erledigt. XbToolsIII gibt es nicht als Demo. Schade, schade, schade.
EditOFF
Gruß Rolf
Admin of www.Ruhrpottboard.de
Admin of www.Ruhrpottboard.de
- Jan
- Marvin
- Beiträge: 14651
- Registriert: Fr, 23. Sep 2005 18:23
- Wohnort: 49328 Melle
- Hat sich bedankt: 21 Mal
- Danksagung erhalten: 88 Mal
- Kontaktdaten:
Rolf,
in dem Fall würde das eh nicht helfen. Die XBTool sind genau das, was damals die original Clipper-Tools waren. Nicht weniger (außer das, was eben unter Windows nicht mehr gehen kann), aber auch nicht mehr.
So manches brauchst Du aber aus den anderen Tools sowieso nicht mehr, weil das unter Windows das nicht mehr benötigt wird, oder weil in der "normalen" Xbase++ das schon drin ist.
Jan
in dem Fall würde das eh nicht helfen. Die XBTool sind genau das, was damals die original Clipper-Tools waren. Nicht weniger (außer das, was eben unter Windows nicht mehr gehen kann), aber auch nicht mehr.
So manches brauchst Du aber aus den anderen Tools sowieso nicht mehr, weil das unter Windows das nicht mehr benötigt wird, oder weil in der "normalen" Xbase++ das schon drin ist.
Jan
-
- Rekursionen-Architekt
- Beiträge: 101
- Registriert: Di, 22. Jul 2008 15:39
- Wohnort: RE - NRW
- Kontaktdaten:
Thx ... ich werde nächste Woche mal eine Liste erstellen. Vorher möchte ich genauer eroieren, was ich sowieso rauswerfen kann. Die 640KB RAM Swap Sache kann weg, die alten Terminal und Mailboxfunktionen können raus und noch paar Dinge. Da wird meine momentane ´unresolved external´ Liste erheblich kürzer. Die werde ich dann hier mal einstellen.
Gruß Rolf
Admin of www.Ruhrpottboard.de
Admin of www.Ruhrpottboard.de
-
- Rekursionen-Architekt
- Beiträge: 101
- Registriert: Di, 22. Jul 2008 15:39
- Wohnort: RE - NRW
- Kontaktdaten:
Ja ich kenne Josef. Der ursprüngliche Mailbox Sourcecode stammt aber nicht vom Josef sondern von Silverware aus den USA. SilverWare hatte damals die LIB für DFÜ (SilverAsync) entwickelt und eine komplette Mailbox als Sourcecode dazu geliefert. Wir hatten das Zeug aus den USA importiert. Ich habe mit Josef damals eine kurze Zeit zusammengearbeitet ... aber nur ganz kurz und ich möchte mich nicht weiter dazu auslassen, gehört nicht hier hin.
Gruß Rolf
Admin of www.Ruhrpottboard.de
Admin of www.Ruhrpottboard.de
-
- Rekursionen-Architekt
- Beiträge: 101
- Registriert: Di, 22. Jul 2008 15:39
- Wohnort: RE - NRW
- Kontaktdaten:
Express++ habe ich mir schon besorgt, hatte leider noch keine freie Zeit um das mal anzutesten.
Innerlich bin ich aber mittlerweile so weit, dass ich mich zu der ´Ochsentour´ entschlossen habe d.h. volle Migration nach XBase++ GUI. Wie oder was für nen Weg bzw. ob mit oder ohne Umweg, dass muss ich noch genauer eroieren.
Ich bin ja völliger XBase Neuling und muss mich in die OOP Handhabung erst einmal ´eindenken´ ... sozusagen im Kopf die ganzen Switches von Clipper, Assembler, Pascal, PHP, mySQL, Perl, HTML in Richtung XBase und OOP umlegen. Das wird noch etwas dauern, denn in der XBase++ OOP Welt ist alles etwas anders.
Innerlich bin ich aber mittlerweile so weit, dass ich mich zu der ´Ochsentour´ entschlossen habe d.h. volle Migration nach XBase++ GUI. Wie oder was für nen Weg bzw. ob mit oder ohne Umweg, dass muss ich noch genauer eroieren.
Ich bin ja völliger XBase Neuling und muss mich in die OOP Handhabung erst einmal ´eindenken´ ... sozusagen im Kopf die ganzen Switches von Clipper, Assembler, Pascal, PHP, mySQL, Perl, HTML in Richtung XBase und OOP umlegen. Das wird noch etwas dauern, denn in der XBase++ OOP Welt ist alles etwas anders.
Gruß Rolf
Admin of www.Ruhrpottboard.de
Admin of www.Ruhrpottboard.de