Kalender [aufgegeben]

Alle Fragen um die Programmierung, die sich sonst nicht kategorisieren lassen. Von Makro bis Codeblock, von IF bis ENDIF

Moderator: Moderatoren

Antworten
Benutzeravatar
Wolfgang_B
Rekursionen-Architekt
Rekursionen-Architekt
Beiträge: 484
Registriert: Do, 14. Jun 2007 18:22
Wohnort: 94065 Waldkirchen
Hat sich bedankt: 14 Mal
Danksagung erhalten: 5 Mal

Kalender [aufgegeben]

Beitrag von Wolfgang_B »

Hi,
ich habe irgendwo mal Sourcecode für einen Kalender gefunden. Der lief auch mal. Habe jetzt den Code mal ausprobiert, läuft jetzt aber nicht mehr :(

Fehlermeldung: "Could nor create AktiveX control". #include "activex.ch" ist eingebunden. Weis jemand woher der Code stammt und wie man das wieder zum Laufen bringt?
PROCEDURE DisplayCalendar( oOwner )

LOCAL oDlg
LOCAL oXbp
LOCAL aRect

oDlg := XbpDialog():New( AppDesktop(), oOwner )
oDlg:Title := "Kalender"
oDlg:Border := XBPDLG_RAISEDBORDERTHIN_FIXED
oDlg:Create( ,,,{100,100},, .F. )

oXbp := XbpMonthView():New( oDlg:DrawingArea )
oXbp:Create()
oXbp:MultiSelect := .T.
*oXbp:MinDate := oOwner:oDeparture:GetData()
*oXbp:MaxDate := oOwner:oArrival:GetData()
oXbp:MaxSelect := 9999
*oXbp:SelStart := oOwner:oDeparture:GetData()
*oXbp:SelEnd := oOwner:oArrival:GetData()
oXbp:MonthRows := 3
oXbp:MonthColumns:= 4
oXbp:ShowWeekNumbers := .T.

oXbp:SetPos( {0,0} )
oXbp:Disable()

aRect := oXbp:CurrentSize()
aRect := {0,0,aRect[1],aRect[2]}
aRect := oDlg:CalcFrameRect( aRect )
oDlg:SetSize( {aRect[3],aRect[4]} )

CenterControl( oDlg, oOwner )

oDlg:ShowModal()
oDlg:Destroy()

RETURN
Zuletzt geändert von Wolfgang_B am Di, 21. Jan 2020 18:01, insgesamt 1-mal geändert.
Beste Grüße
Wolfgang

Mitglied des Deutschsprachigen Xbase-Entwickler e. V.
Mitglied der XUG Osnabrück
ramses
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 2513
Registriert: Mi, 28. Jul 2010 17:16
Hat sich bedankt: 12 Mal
Danksagung erhalten: 77 Mal

Re: Kalender

Beitrag von ramses »

Hallo Wolfgang

du musst mscomctl2.ocx auf dem PC haben und diese auch korrekt registriert haben.
Valar Morghulis

Gruss Carlo
Benutzeravatar
brandelh
Foren-Moderator
Foren-Moderator
Beiträge: 15688
Registriert: Mo, 23. Jan 2006 20:54
Wohnort: Germersheim
Hat sich bedankt: 65 Mal
Danksagung erhalten: 33 Mal
Kontaktdaten:

Re: Kalender

Beitrag von brandelh »

Bei der Suche nach "XbpMonthView" im Forum gibt es viele Treffer ...
Gruß
Hubert
Benutzeravatar
Werner_Bayern
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 2120
Registriert: Sa, 30. Jan 2010 22:58
Wohnort: Niederbayern
Hat sich bedankt: 29 Mal
Danksagung erhalten: 70 Mal

Re: Kalender

Beitrag von Werner_Bayern »

Servus Wolfgang,

ist nicht XbpDatePicker() das, was Du brauchst?
es grüßt

Werner

<when the music is over, turn off the lights!>
Benutzeravatar
Wolfgang_B
Rekursionen-Architekt
Rekursionen-Architekt
Beiträge: 484
Registriert: Do, 14. Jun 2007 18:22
Wohnort: 94065 Waldkirchen
Hat sich bedankt: 14 Mal
Danksagung erhalten: 5 Mal

Re: Kalender

Beitrag von Wolfgang_B »

Hm, XbpDatePicker() sagt mir nichts, auch aus der Doku kann ich nicht erkennen, was das macht.

Habe mal das rudimentär aufgesetzt:
oDataPicker := XbpDatePicker():new( , , 100, {100,300 } )
oDataPicker:create()
Dann müßte doch eigentlich was passieren. mscomctl2.ocx ist NICHT auf dem Rechner. Im Internet ist die auch nicht zu finden ...

siehe Folgeantwort ...
Zuletzt geändert von Wolfgang_B am Di, 21. Jan 2020 17:50, insgesamt 2-mal geändert.
Beste Grüße
Wolfgang

Mitglied des Deutschsprachigen Xbase-Entwickler e. V.
Mitglied der XUG Osnabrück
Benutzeravatar
Jan
Marvin
Marvin
Beiträge: 14641
Registriert: Fr, 23. Sep 2005 18:23
Wohnort: 49328 Melle
Hat sich bedankt: 21 Mal
Danksagung erhalten: 87 Mal
Kontaktdaten:

Re: Kalender

Beitrag von Jan »

Wolfgang,

mal abgesehen davon, das der dritte Parameter in einem :new() ein Array und nicht ein einzelner Wert ist: Lt. Hilfe muß das hier :init(oParent, oOwner, aPos, aSize) heißen.

Jan
Mitglied der XUG Osnabrück
Mitglied der XUG Berlin/Brandenburg
Mitglied des Deutschsprachige Xbase-Entwickler e. V.
Benutzeravatar
Wolfgang_B
Rekursionen-Architekt
Rekursionen-Architekt
Beiträge: 484
Registriert: Do, 14. Jun 2007 18:22
Wohnort: 94065 Waldkirchen
Hat sich bedankt: 14 Mal
Danksagung erhalten: 5 Mal

Re: Kalender

Beitrag von Wolfgang_B »

Jan - stimmt :D

Jetzt sieht die Fehlermeldung schon eher richtig aus. Er meckert jetzt "could not create Active Xcontrol". Das sieht nach der Datei "mscomctl2.ocx" aus die nicht da ist und die ich nirgends finde :angry4:
Beste Grüße
Wolfgang

Mitglied des Deutschsprachigen Xbase-Entwickler e. V.
Mitglied der XUG Osnabrück
Benutzeravatar
Wolfgang_B
Rekursionen-Architekt
Rekursionen-Architekt
Beiträge: 484
Registriert: Do, 14. Jun 2007 18:22
Wohnort: 94065 Waldkirchen
Hat sich bedankt: 14 Mal
Danksagung erhalten: 5 Mal

Re: Kalender

Beitrag von Wolfgang_B »

ok, lassen wir das. Thema erledigt :angry5:
Beste Grüße
Wolfgang

Mitglied des Deutschsprachigen Xbase-Entwickler e. V.
Mitglied der XUG Osnabrück
Benutzeravatar
HaPe
1000 working lines a day
1000 working lines a day
Beiträge: 995
Registriert: So, 15. Nov 2015 17:44
Wohnort: 71665 Vaihingen-Enz
Hat sich bedankt: 17 Mal
Danksagung erhalten: 15 Mal

Re: Kalender [aufgegeben]

Beitrag von HaPe »

Hallo Wolfgang !
ok, lassen wir das. Thema erledigt
Nein, so schnell geben wir nicht auf.

Komm nach Regensburg, dann zeige ich euch wie es ohne Registrierung, dafür mit Manifest auch mit den OCX´en klappt.
Das OCX immer neben die Applikation legen (am übersichtlichsten in ein Unterverzeichnis) ohne Registrierung, dann putzt auch kein Updater oder Deinstaller das benötigte Teil weg 8)
--
Hans-Peter
Benutzeravatar
AUGE_OHR
Marvin
Marvin
Beiträge: 12903
Registriert: Do, 16. Mär 2006 7:55
Wohnort: Hamburg
Hat sich bedankt: 19 Mal
Danksagung erhalten: 44 Mal

Re: Kalender

Beitrag von AUGE_OHR »

Wolfgang_B hat geschrieben: Di, 21. Jan 2020 18:01 ok, lassen wir das. Thema erledigt :angry5:
in der DXE LIB gibt es MONTHCAL_CLASS ( "SysMonthCal32" ) was genau das Control ist.
der Source liegt bei Pablo unter
xfree.public
Month Calendar Control Source for Xbase++ using ot4xbSource for Xbase++ using ot4xb
gruss by OHR
Jimmy
Benutzeravatar
brandelh
Foren-Moderator
Foren-Moderator
Beiträge: 15688
Registriert: Mo, 23. Jan 2006 20:54
Wohnort: Germersheim
Hat sich bedankt: 65 Mal
Danksagung erhalten: 33 Mal
Kontaktdaten:

Re: Kalender [aufgegeben]

Beitrag von brandelh »

Diese Controls wurden doch mit Office oder VisualBasic (oder auch anderen) mitgeliefert und installiert.
Es gab hier mal eine Diskussion, ob es überhaupt legal wäre die in eigenen Programmen zu nutzen ...
Gruß
Hubert
Benutzeravatar
Wolfgang_B
Rekursionen-Architekt
Rekursionen-Architekt
Beiträge: 484
Registriert: Do, 14. Jun 2007 18:22
Wohnort: 94065 Waldkirchen
Hat sich bedankt: 14 Mal
Danksagung erhalten: 5 Mal

Re: Kalender [aufgegeben]

Beitrag von Wolfgang_B »

ok, danke für die Tipps. Ich bin in Regensburg dabei. Bin gespannt ..
Beste Grüße
Wolfgang

Mitglied des Deutschsprachigen Xbase-Entwickler e. V.
Mitglied der XUG Osnabrück
Antworten