Die Suche ergab 8910 Treffer

von AUGE_OHR
Mi, 29. Aug 2018 9:51
Forum: Programmierung allgemein
Thema: Unterschiedliches verhalten runshell() 32bit 64bit ?
Antworten: 10
Zugriffe: 711

Re: Unterschiedliches verhalten runshell() 32bit 64bit ?

Kann man irgendwie abfrage ob 32 oder 64 Bit? JA FUNCTION Is64Bit() RETURN IF( FILE( "C:\WINDOWS\SysWOW64","D" ), .T., .F. ) was meinst du mit "funktioniert nicht" ... die "Umleitung" > ef.pd :?: cmdline := "/C " + LiniFile:ReadString("System","PRISMApfad", "\PRISMA") +"32\funzip " + substr(getenv(...
von AUGE_OHR
Mi, 29. Aug 2018 2:02
Forum: Programmierung allgemein
Thema: XppFatal.LOG beim verlassen der App [erledigt]
Antworten: 4
Zugriffe: 322

Re: XppFatal.LOG beim verlassen der App [erledigt]

hahaha ... :lol: ... Die Lösung war super trivial :roll: ich habe ja xbeP_ Quit gegen xbeP_ Close getauscht und die Abfrage und QUIT auskommentiert. wenn er die Schleife verlässt hab ich noch paar Aufräumarbeiten bevor er die App verlässt ... aber kein QUIT . wenn ich also als letzte Zeile QUIT schr...
von AUGE_OHR
Mi, 29. Aug 2018 1:46
Forum: Windows, API
Thema: DragDrop Mailitem "aus" Outlook nach Xbase++ App
Antworten: 1
Zugriffe: 372

DragDrop Mailitem "aus" Outlook nach Xbase++ App

moin, es gibt ja das Demo \SOURCE\samples\basics\DRAGDROP\DROP.EXE ich habe das Demo nun so erweitert das er mir, nachdem ich ein Mail-Item aus der Mail-Liste von Outlook per DragDrop in meine Xbase++ App eingefügt habe, die Mail anzeigt egal ob Text oder HTML (RTF ?). wenn ein Attachment dabei ist ...
von AUGE_OHR
Mi, 29. Aug 2018 1:31
Forum: Programmierung allgemein
Thema: XppFatal.LOG beim verlassen der App [erledigt]
Antworten: 4
Zugriffe: 322

Re: XppFatal.LOG beim verlassen der App

hi, wie ich schon sagte hab ich wieder neu angefangen und nur 1 Sache geändert : statt xbeP_ Quit hab ich auf xbeP_ Close und lExit = .T. umgestellt PROCEDURE Main LOCAL lExit := .F. * oDlg:Close := {|| PostAppEvent(xbeP_Quit,,, oDlg)} oDlg:Close := {|| lExit := .T.} * WHILE nEvent != xbeP_Quit DO W...
von AUGE_OHR
Di, 28. Aug 2018 21:21
Forum: Programmierung allgemein
Thema: XppFatal.LOG beim verlassen der App [erledigt]
Antworten: 4
Zugriffe: 322

Re: XppFatal.LOG beim verlassen der App

hi,

Ja ... so was habe ich befürchtet :(
das was mich verwundert ist das jetzt TXT Datei oder BMP auch ein XppFalat.LOG erzeugen ... da war ich gar nicht dran.

ok dann werde ich noch mal anfangen und diesmal beobachten wann das Problem auftaucht.
von AUGE_OHR
Di, 28. Aug 2018 21:16
Forum: Allgemeine Fragen
Thema: 2 Applikationen, springen von einer in die andere
Antworten: 31
Zugriffe: 2346

Re: 2 Applikationen, springen von einer in die andere

hi, falsches Buch, wenn Du den Petzold meinst. Nein ich meine das Buch von Kraig Brockschmidt - Inside Ole. die Emails habe ich zufällig im Demo benutzt. Ich bin erst bei Kapitel 4 und da wurde das alte DDE Verfahren noch mal erklärt. für echtest OLE fehlen mir noch die Structur(en) SRUCTURE FORMATE...
von AUGE_OHR
Di, 28. Aug 2018 9:51
Forum: Programmierung allgemein
Thema: XppFatal.LOG beim verlassen der App [erledigt]
Antworten: 4
Zugriffe: 322

XppFatal.LOG beim verlassen der App [erledigt]

moin, Ich habe das Demo \SOURCE\samples\basics\DRAGDROP\DROP.EXE erweitert um eine weiter COM Schnittstelle und alles scheint zu funktionieren. man kann ein Mailitem aus der Liste von Outlook ziehen und es in das Demo fallen lassen. :D nun hab ich festgestellt das er beim verlassen der App ein XppFa...
von AUGE_OHR
Mo, 27. Aug 2018 13:06
Forum: Allgemeine Fragen
Thema: 2 Applikationen, springen von einer in die andere
Antworten: 31
Zugriffe: 2346

Re: 2 Applikationen, springen von einer in die andere

Wenn Du das verstanden und Dich durch die Clipboard-Formate der Office-Programme gekämpft und gegoogelt und geweint hast, dann kannst Du zu Werke gehen und Dein COM-Objekt schreiben, das ein IDropTarget Interface implementiert. Dieses muss sich dann noch mit RegisterDragDrop beim Betriebssystem reg...
von AUGE_OHR
So, 26. Aug 2018 7:58
Forum: Programmierung allgemein
Thema: Zeit über Mitternacht
Antworten: 9
Zugriffe: 644

Re: Zeit über Mitternacht

In 2.0er Syntax: aus Pablos Forum Since Xbase++ Version 2.00.437 you have the function MicroSeconds(), which does the same (but in Millionth of a Second, rather than Thousands of a Second). dummerweise sagt MicroSeconds() nun nicht welche der beiden API verwendet wird. die "alte" Version hat ein Ov...
von AUGE_OHR
Sa, 25. Aug 2018 20:00
Forum: Programmierung allgemein
Thema: schneller als erlaubt ? [erledigt]
Antworten: 0
Zugriffe: 438

schneller als erlaubt ? [erledigt]

hi, ich führe das ganze in einem Thread aus oThread:SetInterval( 5 ) d.h. 5/100 = 20 Mal / Sekunde bei 1000 / 20 = 50 Sekunden nun braucht er aber "nur" 37.5 bzw 38.5 Sekunden was doch "zu schnell" ist oder ? 100 75159859 75122734 37125 37500.00 0 100 101 75160234 75122734 37500 37500.00 0 101 102 7...
von AUGE_OHR
Fr, 24. Aug 2018 22:45
Forum: Programmierung allgemein
Thema: Zeit über Mitternacht
Antworten: 9
Zugriffe: 644

Re: Zeit über Mitternacht

eine verbesserte Version, mit TimeZone, liefert nun Andreas Gehrs-Pahl #include "OT4XB.CH" Procedure Main() LOCAL cDate1 := '2018-10-27' LOCAL cDate2 := '2018-10-30' LOCAL cTime1 := '23:59:00' LOCAL cTime2 := '23:59:01' LOCAL cOffset1 := '+02:00' // CEST ==> +02:00 LOCAL cOffset2 := '+01:00' // CET ...
von AUGE_OHR
Fr, 24. Aug 2018 4:30
Forum: Programmierung allgemein
Thema: Zeit über Mitternacht
Antworten: 9
Zugriffe: 644

Re: Zeit über Mitternacht

wenn ich das richtig sehe geht die Sommerzeit dieses Jahr vom 25.03.2018 - 28.10.2018. #include "OT4XB.CH" PROCEDURE MAIN() LOCAL st1 := FileTime64():NEW() LOCAL st2 := FileTime64():NEW() LOCAL st3 LOCAL nOneDay := 60*60*24 LOCAL nDays := 0 CLS st1:SetDateTime( CTOD("27.10.2018") , "23:59:00" ) // E...
von AUGE_OHR
Fr, 24. Aug 2018 2:17
Forum: Programmierung allgemein
Thema: Zeit über Mitternacht
Antworten: 9
Zugriffe: 644

Re: Zeit über Mitternacht

so nun habe ich es anders gelöst : FILETIME64 aus ot4xb LOCAL OldTime := FileTime64():NEW() LOCAL NewTime := FileTime64():NEW() LOCAL nOneDay := 60*60*24 LOCAL nSec ... AADD(::aTimeSec, { DATE(), TIME() } ) ... FOR i := 2 TO nLen nDays := 0 // hier nur einfach die beiden Termine setzten OldTime:SetD...
von AUGE_OHR
Do, 23. Aug 2018 19:08
Forum: Programmierung allgemein
Thema: Zeit über Mitternacht
Antworten: 9
Zugriffe: 644

Re: Zeit über Mitternacht

hi,

Danke für die Antwort. Schade das Xbase++ kein Function dafür hat :(
Das Problem ist das ich noch nicht weiss wie ich es testen soll :idea:
von AUGE_OHR
Do, 23. Aug 2018 17:18
Forum: Programmierung allgemein
Thema: Zeit über Mitternacht
Antworten: 9
Zugriffe: 644

Zeit über Mitternacht

ich bin mir nicht sicher ob das richtig ist ... wie teste ich solche Sachen die über Mitternacht gehen :?: AADD(::aTimeSec, { SECONDS(), DATE() } ) FOR i := 2 TO nLen nDays := 0 nStart := ::aTimeSec[i-1][1] nStop := ::aTimeSec[i] [1] // vergeleiche Datum IF ::aTimeSec[i-1][2] <> ::aTimeSec[i][2] nDa...
von AUGE_OHR
Mi, 22. Aug 2018 20:06
Forum: GUI
Thema: Frage zu GRA_CLR [Erledigt]
Antworten: 7
Zugriffe: 577

Re: Frage zu GRA_CLR [Erledigt]

Aber was ist die Standard-Hintergrundfarbe des gerade markierten Satzes? Da finde ich keine Konstante zu. es gibt die Demo \SOURCE\samples\basics\PRESPARA\PANEL.EXE allerdings ohne Manifest. unter "Markierte Elemente" findest du das #define XBP_PP_HILITE_FGCLR 6 #define XBP_PP_HILITE_BGCLR 8 #defin...
von AUGE_OHR
Di, 21. Aug 2018 21:44
Forum: Programmierung allgemein
Thema: größere Schrift für ConfirmBox
Antworten: 2
Zugriffe: 254

Re: größere Schrift für ConfirmBox

Confirmbox() Schriftgröße
viewtopic.php?t=9686
von AUGE_OHR
Fr, 17. Aug 2018 4:53
Forum: Allgemeine Fragen
Thema: SMB2 Mischbetrieb
Antworten: 18
Zugriffe: 1000

Re: SMB2 Mischbetrieb

Der Support für Windows Server 2008/Windows 7 läuft bis 2020 aus, das ist ja sehr wichtig zwecks Sicherheitsupdates und da die Lücken nicht mehr gepatcht werden JA ... und auch Exchange soll eingestellt werden ... und das sind die Apps die Ports aufmachen ... ich spreche von einem (neu aufgesetzten...
von AUGE_OHR
Fr, 17. Aug 2018 4:15
Forum: Allgemeine Fragen
Thema: SMB2 Mischbetrieb
Antworten: 18
Zugriffe: 1000

Re: SMB2 Mischbetrieb

azzo hat geschrieben:
Do, 16. Aug 2018 21:36
habe gerade die Insider build 2019 installiert.
ist der Server 2019 gemeint oder RS6 Version 10.0.18219.1000 :?:
... sollte der Server 2019 nicht als ABO Modell kommen :roll:
von AUGE_OHR
Do, 16. Aug 2018 7:18
Forum: GUI
Thema: Frage wegen METHOD XbpIcon:Draw()
Antworten: 0
Zugriffe: 498

Frage wegen METHOD XbpIcon:Draw()

moin, in \SOURCE\SYS\xbparts.prg findet man den Source zu METHOD XbpIcon:Draw( oPS, aTargetRect, nState ) an Ende der Methode passiert nun etwas "komisches" ... :shock: oBmpTmp := XbpBitmap():New():Create( oPS ) oPSTmp := XbpPresSpace():New():Create() oBmpTmp:PresSpace( oPSTmp ) oBmpTmp:Make( ::XSiz...
von AUGE_OHR
Do, 16. Aug 2018 0:32
Forum: Allgemeine Fragen
Thema: SMB2 Mischbetrieb
Antworten: 18
Zugriffe: 1000

Re: SMB2 Mischbetrieb

Wir möchten in naher Zukunft auf Windows 10 und Windows Server 2012 neue Hardware macht IMMER auch irgendwelche neuen Problem wobei es beim Server gravierender ausfällt als bei den Clients. Frage : warum soll ein neuer Server her ? (wieso 2012 und nicht 2016 ?) was spricht dagegen den alten Server ...
von AUGE_OHR
Mi, 15. Aug 2018 8:38
Forum: GUI
Thema: funktioniert XbpIcon():Savefile() ? [erledigt]
Antworten: 2
Zugriffe: 263

Re: funktioniert XbpIcon():Savefile() ?

Nachtrag
AUGE_OHR hat geschrieben:
Mi, 15. Aug 2018 4:39
das komische ist :
ich habe dort noch KEINE Icons also dürfte File(cFile) == .T. nicht eintreten [-X
auch ein BUG der wohl in der v2.x behoben wurde PDR 6791.

p.s. es scheint zu funktionieren wenn man den vollen Path angibt.
von AUGE_OHR
Mi, 15. Aug 2018 7:48
Forum: Windows, API
Thema: Windows OS System Font ? [erledigt]
Antworten: 4
Zugriffe: 618

Re: Windows OS System Font ?

so jetzt hab ich den (alten) Thread gefunden aus dem auch die Lösung stammt
ganz unten ist der Source dazu
von AUGE_OHR
Mi, 15. Aug 2018 4:39
Forum: GUI
Thema: funktioniert XbpIcon():Savefile() ? [erledigt]
Antworten: 2
Zugriffe: 263

Re: funktioniert XbpIcon():Savefile() ?

deshalb meine Frage ob XbpIcon():Savefile() überhaupt funktioniert ... :?: es wurde für die v2.x behoben siehe PDR 6681 was wohl der Fehler ist, den man selbst beheben kann (\SOURCE\SYS\xbparts.prg ), zeigt dieser SnapShot XbpIcon_SaveFile.jpg das ::Handle ist <> 0 ... aber was soll das .OR. :?: da...
von AUGE_OHR
Mi, 15. Aug 2018 2:51
Forum: GUI
Thema: funktioniert XbpIcon():Savefile() ? [erledigt]
Antworten: 2
Zugriffe: 263

funktioniert XbpIcon():Savefile() ? [erledigt]

wenn man XbpIcon() (\SOURCE\SYS\xbparts.prg) so modifiziert EXPORTED: VAR Handle dann kann man eine Imagelist und "GetIcon" verwenden nHICON := @comctl32:ImageList_GetIcon( hImageToolbar, ; nIndex-1 , ; ILD_NORMAL ) // assign to modifyed XbpIcon() oIcon:Handle := nHICON oIcon:GetIconInfo() @User32:D...