Inoffizielles deutsches Xbase-Forum

hi, ... kann ich per 'set softseek on' festlegen, dass die Suche beim nächstgrösseren Element endet falls das eigentliche Element nicht gefunden wird. Jetzt meine Frage: Gibt es bei der Durchsuchung von Arrays auch eine möglichst elegante Lösung wie dieses Softseek? wenn du beim suchen den ganzen Be...

Gibt es eine Möglichkeit, zu sehen, in welcher Zeile der Cursor sich befindet? Weil gerade hat ja alles eine Farbe... du kannst ja das versuchen oBrowse:colorRect( {oBrowse:rowpos, 1, oBrowse:rowpos, oBrowse:colCount}, {4, 2} ) // andere Farbe oBrowse:HILITE() **1** oBrowse:REFRESHCURRENT() das Hil...

#include "gra.ch" PROCEDURE MAIN LOCAL oXbp local cText := "Hello world" oXbp := XbpStatic():new( ,, {10, 10 },{400, 100} ) oXbp:Create() TuMal(oXbp,cText) RETURN PROCEDURE TuMal(oXbp,cText) local aBox,nW,nH,oPS := NIL local oFont := XbpFont():new():create( "10.Arial" ) #IFDEF Use_MicroPS oPS := oX...

Rudolf hat geschrieben: ↑

Do, 15. Nov 2018 18:41

Code: Alles auswählen

oPS := XbpPresSpace():new()

wo ist eigentlich das o:Create() ... (und mit welchem Device)

verstanden.
nimm mal die beiden Zeilen raus

ich habe es noch mal getestet und so würde es gehen local aBox,nW,nH,oPS local oFont := XbpFont():new():create( "10.Arial" ) *oPS := XbpPresSpace():new() // FALSCH oPS := NIL oPS:setPageSize({1000,80},GRA_PU_LOMETRIC) GraSetFont( oPS,oFont ) aBox := GraQueryTextBox( oPS, cText ) *oPS := NIL dc_array...

Rudolf hat geschrieben: ↑

Do, 15. Nov 2018 18:41

Ich denke ich muss eine Presentation Space mit der entsprechenden Größe erstellen, Units auf RA_PU_LOMETRIC setzen,

Code: Alles auswählen

function tcenter(cText)
...
oPS:setPageSize({1000,80},GRA_PU_LOMETRIC)
...

nimm doch mal die Zeile raus ...

unicorn hat geschrieben: ↑

Mi, 14. Nov 2018 11:00

Leider bleibt die Farbe der Spalte als highlighted in der sich mein Cursor befindet wenn sich der Cursor über den Bildschirmrand bewegt.

was meinst du mit "über den Bildschirmrand"

nightcrawler hat geschrieben: ↑

Mo, 12. Nov 2018 15:15

oder einfach zu SQL wechseln.

genau das hatte ich mir gedacht ... aber wie ?

@Martin : klar könnte man die Datenbank so modifizieren aber ich benötige es nur einmalig.

zurück zum Thema : läuft eine Xbase++ VIO App :?: wenn ja aber keine GUI App dann solltest du ScreenRes ausprobieren. --- Offtopic : IP4 ist vom Provider und deinem Router abhängig eine Fritzbox ist unter VDSL "von aussen" nicht zu erreichen und AVM hält sich bedeckt bei Anfragen. die Telekom hat wo...

satmax hat geschrieben: ↑

Fr, 09. Nov 2018 14:17

... dass ich mein xBase Programm auf meinem PC nicht mehr starten kann, nichts, keine Ausgabe.

unter Windows 10 gab/gibt es des Problem das GUI Apps nicht starten, also mal eine VIO App versuchen.
siehe viewtopic.php?f=16&t=10107&p=117545

hi,

ich habe mehrfach den Namen und jeweils eine Nummer jetzt möchte ich die nach Häufigkeit des Namen sortieren ... wie mache ich das ...

hi, willkommen im Forum. wäre nett wenn du dich erst mal vorstellen würdest. was dein QR-Code Scanner angeht : wie sieht es aus mit einer Schnittstellen Beschreibung vom Hersteller :?: ein "Umleitung" der Ausgabe in eine Datei ist wohl nicht der Weg den der Hersteller sich gedacht hat ... [-X üblich...

ecz hat geschrieben: ↑

Mi, 07. Nov 2018 22:24

bei dem versuch den letzten datensatz anzusteuern - eine 4gb große dbf-datei erzeugt wird.

hm ... ist mir noch nie passiert

wie sieht denn deine DBESYS aus
welche Xbase++ Version

Ist es - und wenn ja wie - möglich, die Zeile des Körpers komplett einzufärben? versuch es mal mit oBrowse:colorSpec := "W+/BG,W+/R,W+/B" IF oBrowse:stable // alert if hit top or bottom of browse IF oBrowse:hitTop .OR. oBrowse:hitBottom TONE(125, 0) ENDIF oBrowse:colorRect( {oBrowse:rowpos, 1, oBro...

Kann ich vielleicht als Workaround den normalized-Event irgendwie in meine Eventloop einbauen und die Buttons mit configure() wieder nach vorn bringen? dafür gibt es den o:resize Callback Slot oDlg:drawingArea:resize := {|aOld,aNew,oSelf| MainResize(aOld,aNew,oSelf) } PROCEDURE MainResize(aOldSize,...

hi, Gib es vielleicht eine Möglichkeit, damit das Problem gar nicht erst auftritt? das Problem ist die Reihenfolge des o:Create(). bei einen re-paint, was bei MINIMIZED -> NORMALIZED passiert, werden in der Reihenfolge der o:Create() die XbParts gemalt. wenn also der Button nach der Groupbox erstell...

hi, der Weg es auch noch in der Registry und "Favorite" (REG_BINARY) einzutragen war mir zu umständlich. ich habe es nun mit dem rechte-Maustaste Menu Element (Verb) gemacht objShell := CreateObject("shell.application") IF NIL <> objShell objFolder := objShell:NameSpace(cDir) IF NIL <> objFolder #IF...

DANKE

da es sich um ein 2-Dim Array handelt muss ich es ein wenig ändern

hi, ich habe Winhlp32.EXE (XP Version) ins Alaska Verzeichnis kopiert was auch unter 10.0.18272.1000 (1903) funktioniert. gerade bei den Windows Insider Versionen die ständig kommen wird immer wieder die Winhlp32.exe überschrieben wenn die im %windir% liegt. ich ändere deshalb nur noch die Verknüpfu...

hi, wie hole ich aus einem Array nur die Elemente die einem "Filter" entsprechen :?: FUNCTION ArrayFilter(cDLL) LOCAL aALL := Get_Array() LOCAL aRet := {} LOCAL nStart := 1 LOCAL nPosi DO WHILE .T. nPosi := ASCAN(aALL,{|x| x[1] = cDLL },nStart) IF nPosi > 0 AADD(aRet,aALL[nPosi]) nStart := nPosi+1 E...

hi, wie ich ein XbpBitmap() in einer DBF abspeichere ist mir bekannt ... aber wie mache ich es mit XbpIcon :? 1.) welche DBE (FOXCDX) :?: 2.) welchen Type "V" oder "M" :?: 3.) HEX oder BIN :?: mit cHex2Bin(oIcon) bzw cBin2Hex(oIcon) hat er mir Interne Datenstrukturen beschädigt gemeldet wenn ich das...

hi, Bist Du Dir mit dem %USERPROFILE% sicher? https://social.technet.microsoft.com/wiki/contents/articles/28239.how-to-manage-windows-taskbar-items-pinning-using-group-policy.aspx Danke für den Hinweis USERPROFILE=C:\Users\a APPDATA=C:\Users\a\AppData\Roaming da %USERPROFILE% in %APPDATA% vorhanden ...

hi,

ich versuche einen LNK in zum laufen zu bringen. der LNK wird zwar erstellt aber erscheint nicht in der Taskbar ... wieso

diese Online Uhr gibt einen die Differenz zur PC Zeit an (+-8ms)

https://uhr.ptb.de/
damit hat man Silvester eine Referenz Uhr