Die Suche ergab 310 Treffer

von satmax
18. Oktober 2021, 08:06
Forum: Programmierung allgemein
Thema: Nur weil ich neugierig war
Antworten: 5
Zugriffe: 2373

Re: Nur weil ich neugierig war

Ich dachte mir, daß ich etwas übersehen habe, und auch die Windev braucht Laufzeitt, Mal 100 000 durchlaufen lassen ;) Mir ist auch noch eine andere Möglichkeit eingefallen GetDrivesA , das Ding gibt ein int zurück und jedes Bit bestimmt welches Lauffwerr da ist Bit 0 -> LW A: Bit 26 -> LW Z: Das e...
von satmax
17. Oktober 2021, 08:47
Forum: Programmierung allgemein
Thema: Nur weil ich neugierig war
Antworten: 5
Zugriffe: 2373

Re: Nur weil ich neugierig war

Es gibt fast nichts was es nicht gibt in WD. ;-)

Alle Laufwerke finden:

Code: Alles auswählen

sDrives is string  = fListDisk()
Result (auf meinem PC, Zeit praktisch nicht messbar...):

C:
D:
E:
F:
G:
H:
I:
K:
L:
M:
O:
S:
T:
U:
V:
W:

Win API habe ich auch schon verwendet (für WIBI Key). .Net lasse ich außen vor...
von satmax
18. August 2021, 14:43
Forum: Allgemeines
Thema: Constanten defines array
Antworten: 21
Zugriffe: 4599

Re: Constanten defines array

Ahh, ich kenn enum halt von c++
von satmax
18. August 2021, 13:34
Forum: Allgemeines
Thema: Constanten defines array
Antworten: 21
Zugriffe: 4599

Re: Constanten defines array

DO ?
von satmax
16. August 2021, 13:59
Forum: Allgemeines
Thema: Constanten defines array
Antworten: 21
Zugriffe: 4599

Re: Constanten defines array

Windev ist nicht xBase, da geht vieles anders, umgekehrt geht vieles weniger... ;-) Sie dir mal Enumeration an, ich finde Namen immer lesbarer wie Zahlen: EAuftragsart is Enumeration Angebot =1 Auftrag =2 Rechnung =3 END SWITCH EAuftragsart CASE Angebot CASE Auftrag CASE Rechnung END Info(EAuftragsa...
von satmax
16. August 2021, 10:56
Forum: Allgemeines
Thema: Constanten defines array
Antworten: 21
Zugriffe: 4599

Re: Constanten defines array

Noch eine Alternative: CONSTANT MEINE_FELDER = "artnr, matchcode, text1, text, warengruppe" END Info(fieldGet(MEINE_FELDER,3)) PROCEDURE fieldGet(sFelder,n) arrArtikelfelder is array of string StringToArray(sFelder, arrArtikelfelder,",") IF n > ArrayCount(arrArtikelfelder) OR n < 1 THEN RESULT "" EL...
von satmax
16. August 2021, 09:15
Forum: Allgemeine Fragen
Thema: Connect zu ADS
Antworten: 7
Zugriffe: 4352

Re: Connect zu ADS

In der PC Version arbeiten wir mit OLEDB (MS SQL Server). Mobil verwenden wir nur was Windev mitliefert. Wir haben einen Mobile-Server (am PC), der übernimmt die völlige Kommunikation mit den Geräten. Datenbankabfragen kommen praktisch als String rein, werden vom Mobile-Server an den MS SQL Server w...
von satmax
16. August 2021, 09:05
Forum: Allgemeines
Thema: Constanten defines array
Antworten: 21
Zugriffe: 4599

Re: Constanten defines array

Ohne viel nachzudenken könnte man es so machen: garrArtikelfelder is array of string StringToArray("artnr"+CR+"matchcode"+CR+"text1"+CR+"text"+CR+"warengruppe", garrArtikelfelder) // Oder alternativ: // StringToArray("artnr, matchcode, text1, text, warengruppe", garrArtikelfelder,",") Info(fieldGet(...
von satmax
19. Juli 2021, 06:11
Forum: Allgemeines
Thema: Constanten defines array
Antworten: 21
Zugriffe: 4599

Re: Constanten defines array

Also ich habe noch immer keine Ahnung was du willst. Eine genau Anforderung oder ein Beispiel könnte da helfen... Oder meinst du einfach so was in der Art: {sTable + "." + sField} = {dsMySource + "." + sField} oder so: sResControl = EnumControl({sControl}, i) oder so: IF NOT TmEmpty(sDBField) _AND_ ...
von satmax
29. Juni 2021, 14:34
Forum: Allgemeines
Thema: Constanten defines array
Antworten: 21
Zugriffe: 4599

Re: Constanten defines array

Ich verstehe als Österreicher auch nicht was du willst... Wäre sicher hilfreich wenn uns du erklären würdest worum es geht.

INFO() erwartet einen String und gibt eine Meldung am Bildschirm aus: Info("Hello" + User_Name, "Welcome!")
von satmax
14. Juni 2021, 12:41
Forum: Informationen
Thema: Version 26
Antworten: 18
Zugriffe: 6027

Re: Version 26

Wir arbeiten seit Beginn an mit V26, eine Kleinigkeit mit einer Änderung der Sichtbarkeit von Variablen, da war einer unserer Reports betroffen. Bei den Kunden lief immer alles problemlos.
von satmax
8. Juni 2021, 10:44
Forum: Informationen
Thema: Version 26
Antworten: 18
Zugriffe: 6027

Re: Version 26

Es gibt seit ein paar Tagen die Release Version V26: 01A260100j

https://windev.com/ts/download/windev26 ... 6_100j.htm
von satmax
15. April 2021, 16:50
Forum: Informationen
Thema: Version 26
Antworten: 18
Zugriffe: 6027

Re: Version 26

Ich habe jetzt 15 Projekte umgestellt die via Softwarefactory erstellt werden. Bisher ist dabei ein dummer Fehler aufgetaucht: ich erhalte bei einigen Projekten die Warnungen: Warning : 'Encrypt' is kept in this version for backward compatibility. WIN_Logon.PROCEDURE.UpdateLogon, Local procedure, li...
von satmax
15. April 2021, 16:25
Forum: Allgemeines
Thema: Report: Druck in Farbe
Antworten: 5
Zugriffe: 1488

Re: Report: Druck in Farbe

Kanns mir zeigen wie du das vorher reingeschrieben hast? Ich habe da so eine Idee...

EDIT: Ich habe ein Edit Control zum bearbeiten des RTF Textes und ein STC Control im Formular zur Ausgabe, beide Controls müssen halt auf RTF eingestellt sein. Bei klappt das problemlos.
von satmax
15. April 2021, 16:22
Forum: Allgemeines
Thema: Report: wenn leer nicht drucken [erledigt]
Antworten: 11
Zugriffe: 2624

Re: Report: wenn leer nicht drucken

IMHO ist das ein Klassiker für eine Table. Egal ob die die Table mit einem SQL Query oder via Funktion befüllst, aber so würde ich das nicht machen. Mit einer Table geht dann alles von selbst, egal ob eine oder 100 Rechnungspositionen.... Oder geht's dir um das Unterdrücken von Leerzeilen? Korrekt! ...