| |
| |
|
Wilfried
Friebe |
CompileMarkSeparation-Begin------------------------------------------------------------------
Declare Anzahl%, i%, Name$, Browse$, länge%
Cls
TextColor @RGB(255, 0, 100), -1
Set(CharSet, 0)
UseFont ARIAL, 15, 10, 1, 0, 0
@db(Open, #1,Musik.DBF)
@db(Use, #1)
Print db-Struktur von Musik.DBF
Print Datensätze: ;&dbRecCount
Print Felder: ;%dbFCount
Print Satzgröße: ;%dbRecSize; Byte
Print Headergröße: ;%dbHeader; Byte
Print Letzte Änderung: ;$dbLUpdate
Anzahl% = %dbFCount
i% = 1
WhileNot i% > Anzahl%
@db(GetField, i%)
Print $dbFName,$dbFType,%dbFLen,%dbFDecs
Print
Print
Inc i%
EndWhile
@db(Close, #1)
Waitinput
Name$ = @LoadFile$(Welche Datei,*.DBF)
print Name$
@db(Open, #1,Name$)
@db(Use, #1)
Anzahl% = %dbFCount
i% = 1
WhileNot i% > Anzahl%
@db(GetField, i%)
länge%=%dbFLen
länge%= länge%*5
@set(Decimals,0)
Browse$=Browse$+$dbFName+;+$dbFName+;+str$(länge%)+;
Inc i%
EndWhile
@db(Browse, 10,10,ADRESS-TABELLE,10, Browse$ ,3)
print &dbRecCount
@db(AppendBlank)
@dbPack()
@dbClose(#1)
/../funzione-riferimenti/XProfan/end/'>End
I have X Profan and Windows XP
Bildschirmauflösung 1280-1024 and tested too with 1024-768
with both Auflösungen is the same Error aufgetreten
me are missing under with the Toolbar a couple Pixel (see anhängendes Image)
the same Program on one Notebook with windows ME with of/ one
dissolution of 1024-768 correct
who can me there help |
 |
| |
| Board MSI B450M BAZOOKA CPU AMD Ryzen 7 2700x 8 Core 3,7-4,2 GH 32 Gb Ram NVIDIA GeForce GTX 3060 12 GB Ram Window 11 Prof 64 Bit
Sun-Guru-Barebone CPU I7-9750H 16 GB Ram NVIDIA GeForce GTX1660TI 6 GB Ram Window 11 Hom 64 Bit
Profan 4.5 bis Xprofan 14
Ein frisch geschriebenes Programm hat meistens einen großen Fehler.Sollte man versuchen diesen großen Fehler zu beseitigen, hat man viele kleine Fehler "Grins" | 04/22/07 ▲ |
|
| |
|
|
 | You can with the DRUCK-Button your keyboard the actually Bildschirmbild into Clipboard take off. Z.B. with IRFAN-View [...]  joining Save. integrally without Kamera! and Source Please always with
CompileMarkSeparation umschliessen. |
|
| |
| |
| |
|
|
| to that trouble self: The FensterTitelzeile is in the Normallfall z.B. XP higher as under Win98.
Perhaps. too from this reason has Roland a %cycaption Constant erschaffen. These ought to it in its Dialogen self benefit. 
[offtopic]Please no Notes the the DLG possible by RES angehangen is.[/offtopic] |
|
| |
| |
| |
|
|
Rolf
Koch | Mist If was faster 
@ Wilfried: Have with the the code already Done.
Why erstellst Thou not directly the window a couple Pixel More?
I go of it from, the You, the Program under of/ one older Windowsversion develops have? well then ex XP shows itself this effect.
these integrally simply, because there are The welt and Co something ausgeprägter and you are missing these Pixel in the Arbeitsbereich the Fensters.
How iF already said: Drucktaste pressing and a Grafikprogramm open (here reicht even MSPAINT , is Yes already on the system present). then simply Insert dial (evtl. Edit) and Save (best under *.png) and already brauchste no Kamera More (*lol* Kamera the nenn I time ne Hardcopy ) |
|
| |
| |
| |
|
|
 | Wilfried
the lying on the graphic-anger of MicroSoft - with ....XP is the bunte Headline breiter.
I have me always with this Krücke helped:
CompileMarkSeparation
Winversion 5.1 is windows-XP |
|
| |
| |
| |
|
|
| Horst horn
Wilfried the lying on the graphic-anger of MicroSoft - with ....XP is the bunte Headline breiter. I have me always with this Krücke helped: CompileMarkSeparationWinversion 5.1 is windows-XP
But this is really only a Krücke! Nimm %cycaption |
|
| |
| |
| |
|
|
|
But this is really only a Krücke!
but it works !  |
|
| |
| |
| |
|
|
| Horst horn
Horst hornBut this is really only a Krücke! but it works !
but hold only film.  If Styles XP abgestellt are Better get going again cheese - likewise if The Schritart greater - or The Headline higher tuned is!  |
|
| |
| |
| |
|
|
Wilfried
Friebe | first once thanks for speedy Help
will be me tonight extensively with the Prog
keep busy
gez
Wilfried F |
|
| |
| Board MSI B450M BAZOOKA CPU AMD Ryzen 7 2700x 8 Core 3,7-4,2 GH 32 Gb Ram NVIDIA GeForce GTX 3060 12 GB Ram Window 11 Prof 64 Bit
Sun-Guru-Barebone CPU I7-9750H 16 GB Ram NVIDIA GeForce GTX1660TI 6 GB Ram Window 11 Hom 64 Bit
Profan 4.5 bis Xprofan 14
Ein frisch geschriebenes Programm hat meistens einen großen Fehler.Sollte man versuchen diesen großen Fehler zu beseitigen, hat man viele kleine Fehler "Grins" | 04/22/07 ▲ |
|
| |
|
|
Sebastian
Sprenger | iF
Perhaps. too from this reason has Roland a %cycaption Constant erschaffen. These ought to it in its Dialogen self benefit.
alas the there meanwhile? loudly Help but first ex XProfan 9...
Hello Wilfried,
if You yet no XProfan 9 have, separate first XProfan 8 (as accurate have you got the unfortunately not indicated), then can you too subesquent code using...
CompileMarkSeparationthere's sure elegantere Solutions (z.B. over The API GetSystemMetrics), functions but already since Profan 7 wonderful. so can too sichergehen, that The Zeichenfläche the Fensters on each system exakt so wide and high is How desired.
Greeting, Sebastian |
|
| |
|  Profan² 7.0e, XProfan 9, 11.2a, FreeProfan32 Windows Vista Home Premium 32-Bit, 2.8 Ghz, 4 GB RAM Windows Me, 1.8 Ghz, 256 MB RAM | 04/22/07 ▲ |
|
| |
|
|
| Hm your Setwindowpos is syntaktisch so not IO - because of the less my I.
I have there already often that here posted:
CompileMarkSeparation |
|
| |
| |
| |
|
|
Sebastian
Sprenger | Hello iF,
now Yes, it is not absolutely beautiful, but syntaktisch shining it thoroughly correctly To his. at least has Profan such Lines by me yet each time toleriert. 
Greeting, Sebastian |
|
| |
| Profan² 7.0e, XProfan 9, 11.2a, FreeProfan32 Windows Vista Home Premium 32-Bit, 2.8 Ghz, 4 GB RAM Windows Me, 1.8 Ghz, 256 MB RAM | 04/22/07 ▲ |
|
| |
|
(499)
Deutsch
English
Français
Español
Italia