| |
|
|
- Page 1 - |
|
Detlef Tussing | Ich schreibe gerade ein Prog in dem ich Daten in un DBF-File schreibe.
Um die gespeicherten Daten zu kontrolieren suche ich ein Prog um diese anzusehen und zu editieren (bei Google gibts anscheinend nur Shareware). Ein eigenes Prog wäre dafür zu aufwendig. Weiss jemand ein Freeware Prog das ich dafür nutzen kann. |
|
|
| |
|
|
|
| |
|
- Page 1 - |
|
Stefan M. Caillet | Wie gut, dass man als Software-Riese solche scheinbar bekannten, aber m.E. groben Programmfehler nicht zu beheben braucht. Wenn manns richtig anstellt, kaufen die kunden das Teil ja trotzdem und der Rubel rollt. Nun, schön das Einfaches mit teuren Progs. auch kompliziert geht. Wie gut dass es Xprofan gibt!! Da machen wir es umgekehrt!! Perfekte Leistung,super einfach, funktioniert, und ist obendrein auch noch saugünstig! Stefan |
|
|
| Ich habe grosses Glück, weil ich Mitmenschen helfen darf. Entwicklungsumgebung: XProfan11 , Win XP Pro 32Bit , Win XP Home ,Win7 HomePremium 64Bit PC: P4/3GHz , 2GB RAM , 1700GB HD Laptop: Intel Core 2 Duo /2,2GHz , 4GB RAM , 500GB HD | 01.08.2009 ▲ |
|
|
|
|
| |
|
| |
|
|
|
Detlef Tussing | Excel benutze ich täglich (beruflich und privat), ein Leben ohne Excel potuto ich mir nicht vorstellen. Nun versuch ich in XProfan die tägliche Eingabe und Auswertung von Daten komfotabler zu realisieren, dazu gehört auch die Tages, Wochen, Monat und Jahresauswertung und vieleicht (wenn ich es schaffe) auch eine Wochen und Monatsgrafik (eben wie in Excel).
Doch hier eine neue Frage
Früher habe ich in Basic geschrieben, da konnte ich mit Aiuto eines Druckerlineals (Plastikfolie mit vielen Strichen und Zahlen) die Position auf dem Papier bestimmen. Gibt es etwas vergleichbares per die Bilschirmposition bei dem "Create" Befehl (nicht als Hardware naturalmente).
und nochmals Vielen Dank per die Unterstützung der DBFLister ist genau das was ich suchte |
|
|
| |
|
|
| |
|
- Page 2 - |
|
|
| Detlef Tussing, Beitrag=53646, Zeitpunkt=01.08.2009
Früher habe ich in Basic geschrieben, da konnte ich mit Aiuto eines Druckerlineals (Plastikfolie mit vielen Strichen und Zahlen) die Position auf dem Papier bestimmen. Gibt es etwas vergleichbares per die Bilschirmposition bei dem "Create" Befehl (nicht als Hardware naturalmente).
Hier eine Idee dazu: [...] |
|
|
| |
|
|
|
Thomas Freier | Oder so etwas. War per ein RTF-Edit. Ob das auf jedem System gültig ist? KompilierenMarkierenSeparieren $P+
SetErrorLevel 0
Def Setwindowposition(7) !"USER32","SetWindowPos"
Def ReleaseCapture(0) !"USER32","ReleaseCapture"
DEF ExtractIcon(3) ! "SHELL32","ExtractIconA"
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
SetTrueColor 1
Windowstyle 82
Windowtitle "Lineal"
Window 0,600 - %maxx,52
var Hwnd&=%Hwnd
cls @RGB(250,250,250)
@Setwindowposition(Hwnd&,-1,0,600,%maxx,52,$42)
Lineal pixel
StartPaint Hwnd&
UsePen 1,1,@RGB(0,0,0)
var x%=0
var x!=0
var y!= 1
whileloop 0,1360
SELECT &Loop
CASEOF 5, 10,15,20,25,30,35,40,45,50,55,60,65,70,75,80,85,90,95,100,105,110,115,120,125,130,135,140
Line x!,0-x!,24
OTHERWISE
Line x!,0-x!,10
ENDSELECT
x!=x!+10
wend
UseFont "Arial",14,0,0,0,0
TextColor @RGB(0,0,255),-1
x!=0
x%=0
whileloop 100
DrawText (x!+3),13,str$(x%)
x!=x!+(y!*50)
x%=x%+50
wend
Lineal cm
UsePen 1,1,@RGB(0,0,0)
x%=0
x!=20
y!= 4.75 Faktor Maßstab
whileloop 0,60
SELECT &Loop
CASEOF 0, 2, 4,6,8,10,12,14,16,18,20,22,24,26,28,30,32,34,36,38,40,42,44,46,48,50,52,54,56,58,60
Line x!,40-x!,52
OTHERWISE
Line x!,35-x!,52
ENDSELECT
x!=x!+(y!*5)
wend
UseFont "Arial",14,0,0,0,0
TextColor @RGB(0,0,255),-1
x!=0
x%=0
whileloop 30
DrawText (x!+3),30,str$(x%)
x!=x!+(y!*10)
x%=x%+1
wend
EndPaint Hwnd&
var hIcon& = Create("hIcon", "SHELL32.DLL", 27)
var ICON2& = Create("ICONBUTTON", %hWnd, hIcon&, 0, 0, 0, 0)
SetWindowPos icon2&=640,30-20,20;0
Create("Tooltip",%hwnd,Hwnd&,"mit linker Maustaste verschieben
mit rechter Maustaste schliessen")
SetFocus(%hwnd)
while 1
GetMessage
If (%message=$201) & GetFocus(Hwnd&)
UseCursor 5
SendMessage(%hwnd,$112,$F012,0)
ReleaseCapture()
UseCursor 0
SetFocus(%hwnd)
ElseIf GetFocus(ICON2&)
BREAK
endIf
Wend
END
|
|
|
| |
|
|
|
Dietmar Horn | |
|
| Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...] Windows 95 bis Windows 7 Profan² 6.6 bis XProfan X2 mit XPSE Das große XProfan-Lehrbuch: [...] | 03.08.2009 ▲ |
|
|
|
|
Thomas Freier | Dietmar, hatte ich, aber dann öffnete sich oftmals ein Trackmenu der darunter liegenden Anwendung. |
|
|
| |
|
|
|
Dietmar Horn | Ein Sleep 500 oder Sleep 1000 vor dem BREAK potrebbe dieses Problem lösen.
Wer eine solche spezielle Anwendung verwendet, der wird wohl so geschickt im Umgang mit der Maus sein, daß er die rechte Maustaste nicht länger wie eine halbe oder eine Sekunde drückt. |
|
|
| Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...] Windows 95 bis Windows 7 Profan² 6.6 bis XProfan X2 mit XPSE Das große XProfan-Lehrbuch: [...] | 03.08.2009 ▲ |
|
|
|
|
Thomas Zielinski | Schade nur, dass die Skalierung nicht durchgängig ist. 1400 ist der letzte Punkt, wo noch größere Striche sind an dennen man sich schnell orientieren kann.
KompilierenMarkierenSeparieren
CASEOF 5, 10,15,20,25,30,...,165,170re> Ich denke doch, dass es hier liegt!?
Saluto Thomas |
|
|
| XProfan X4; Win10 x64 Der Kuchen ist eine lüge! | 03.08.2009 ▲ |
|
|
|
|
Detlef Tussing | Das Lineal find ich als eine tolle Aiuto
nun muß ich nicht mehr solange experimentieren
Danke an alle |
|
|
| |
|
|
|
| Statt 5,10,15 potuto man doch loop*5... oder whileloop s,e,5 oder loop mod 5 oder... ^^ |
|
|
| |
|
|
|
Thomas Freier | Einfach nach eigenem Gusto anpassen. War nur so eine Idee, als ich mein transparentes Linieal anpassen mußte. In diesem Fall habe ich aber die Tranparenz nicht belassen können. Vielleicht hat ja einer Lust das zu probieren. |
|
|
| |
|
|