XProfan

Deutsch

H.Brill

Hallo,
ich hätte da ne Frage bzgl. Bereich#. Und zwar habe ich mit den XDATA - Befehlen
(geht auch mit ReadText mit ext. Datei) eine einfache Textdatei mit unterschiedlichen
Zeilenlängen in einen Speicherbereich geladen. Nun möchte ich die einzelnen Zeilen einfach in die Listboxliste oder ein Array kopieren. @MoveListToMem gibt
es ja, aber @MoveMemToList nicht. @Mempos und String$() hilft mir irgendwie auch nicht richtig weiter, da ich die Zeilen der Datei (bzw. Bereich#) und deren Länge nicht kenne.

Hat jemand sowas schon gemacht bzw. einen Tipp ?

Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.

19.08.2007 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Du kannst den Mem ja in einen String konvertieren mit meinstring=string$(mem,0)

Dann kannst du z.B. mit whileloop 1,len(meinstring,
) : addstring(listbox,substr$(meinstring,loop,
) : endwhile alle Zeilen in die Listbox pusten. Ein Sendmessage(listbox,wm_setredraw,false,0) vor der Schleife und Sendmessage(listbox,wm_setredraw,true,0) nach der Schleife beschleunigt das Ganze natürlich oft ungemein. Ist der String > 8k dann solltest Du den String vor der Schleife in 8k Teile zerteilen da SubStr sonst nicht grad fix arbeitet.

19.08.2007 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Dieter
Zornow

Versuchs mal so, du must als Trennzeichen dann nur das Zeilenende eingeben, geht nur mit Xprofan 10
Kompilieren Markieren Separieren

cls
declare t#,text$,box&
box& = create(Listbox,%hwnd,0,10,10,200,300)
dim t#,50
string t#,0=Hallo das ist ein Test
text$ = string$(t#,0)
clearlist
movestrtolist(text$, )
movelisttohandle(box&)
waitinput

Viele Grüße aus Bangkok

Dieter

Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

19.08.2007 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

oha movestrtolist - genau noch besser demnach den Bereich in einen String konvertieren mit string$( und danach der Listbox mit
movestrtolist(string,
) der Listboxliste hinzufügen. Anschließend nur noch ein movelisttohandle(... nötig.

19.08.2007 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

H.Brill

Besten Dank,
funktioniert so. Hatte nicht an das
gedacht.

19.08.2007 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

RudiB.

Hallo zusammen,

möchte eine Error-Routine schreiben und in einer Messagebox die Fehlernummern in Klartext anzeigen, mit Zeile etc.
Habe dazu die Fehlermeldungen mit dem Datengenerator in eine BereichsVariable gepackt. Dann mit MoveStrtoList und MoveListtoHandle in die Listbox gepackt. Soweit so gut....226 Einträge.
Nur Selectstring funktioniert nicht, was ist da los ??

Kompilieren Markieren Separieren

CLS
Set("ErrorLevel", -1)
Set("OnError", 1)
Declare Fehler$,fehlerart%,fehler%,fehlertext$,wf$
Declare fehlercode&,text$
Declare fehler#,zaehler%,Ende%
Dim fehler#,8612
Clear fehler#
Long fehler#,0=540028977,2035490874,1835365491,1769103734,1701601889,1651406112,1851878245,221934702,825241866,1176517152,1953197685,544108393,1700949621,1852727659,168639092,540160049,1698832442,1818781030,1651406112,1851878245
Long fehler#,80=221934702,858796298,1226848800,1734702190,1445818981,1634300513,543517794,1635218021,1952806002,822742305,975189040,1952531488,1701538149,1853189742,1919230055,1953653111,220296293,892350730,1411398176,1818583649
Long fehler#,160=1802397036,1970171493,1696622446,1918990194,561276276,808520205,540680246,1229213253,2053251142,1159736951,541414220,1751345518,1701257332,1684960614,220294757,925905162,1159739936,1179206734,1667853856,1730180200
Long fehler#,240=1853187685,560883044,808520205,540680248,1948284250,1701209449,1229477664,1445807436,1668510309,1751343464,1970038132,220292974,959459594,1159739936,1213678670,541412425,779582050,1229477664,1847608652,1952998249
Long fehler#,320=1717921568,1701080693,168632686,540029233,1213669434,541412425,1818781030,168632692,540094769,1330061370,792876371,1129271888,1751475744,220296300,842084618,1344289312,541282130,1818781030,168632692,540225841
Long fehler#,400=1632378938,543974754,1751345518,1701257332,1684960614,221933157,875639050,1512061472,1769218165,543516261,1431523143,1380986690,1445806927,1668510309,1751343464,1970038132,220292974,892416266,1159739936,1380992078
Long fehler#,480=1847608143,1952998249,1717921568,1701080693,168632686,540422449,1143087162,572869961,1918985248,1970151526,1768235122,1818324334,1919252000,1684955511,1702305908,1852138610,822742305,975189809,1229201952,539108941
Long fehler#,560=1718772068,1920298528,1852400928,543973741,2003985782,1952738913,1919252256,560883044,825297421,540680248,1296647202,1679827492,543584865,544372078,1835952485,1981836385,1635218021,544498798,1685218679,220294757
Long fehler#,640=959525130,572537376,558713156,1633951778,1847617138,1696625269,1634561641,1702240364,1851881330,1998615652,1701081701,168632686,540029489,1414733882,1347703361,1414416722,1751475744,220296300,825372938,1109408288
Long fehler#,720=1768256101,762538083,1769103702,1701601889,2003985696,1702130273,168632692,540160561,1633034298,1650551154,1651402092,1768258149,1701734499,1701191794,1919249512,1952866664,822742330,975188786,1918981664,1818386793
Long fehler#,800=1634627173,2048943469,1634476149,221931374,875704586,1394620960,1414676820,1313423696,1701191764,561278056,842074637,540680245,1346524499,1347768399,1751475744,220296300,909259018,1226848800,1685004358,1226863205
Long fehler#,880=1414483526,1751475744,220296300,926036234,1109408288,1751475813,1768431724,1919251566,1396785952,1701191749,561278056,842074637,540680248,1970435155,1920300139,1702520162,1852334953,1696625253,1918990194,561276276
Long fehler#,960=842074637,540680249,1970435155,1920300139,1702520162,1852334953,1713402469,1701603429,1717659762,168639092,540029745,1951604794,1953199474,1700950645,1667851642,1919250024,544569888,1735287148,822742330,975188275
Long fehler#,1040=1918981664,1818386793,1700949605,1667851642,1919250024,2003985696,1702130273,168632692,540160817,1230446650,1445808212,1668510309,1751343464,1970038132,1847617390,1952998249,1819436320,1952609633,822742305
Long fehler#,1116=975188787,1414092576,1701191752,561278056,858851853,540680244,1110259249,1142977641,544427084,1685218679,1981836901,1478520431,1718579792,1847619169,1952998249,1751477536,1853169778,1936876916,2054487156,168632692
Long fehler#,1196=540357425,1816862778,1702064993,1667853856,1730180200,1853187685,980313444,858851853,540680246,1701996868,1986622571,1931505253,543452777,544372078,1512074593,1701603685,1718509934,543649377,1634497125,561275509
Long fehler#,1276=858851853,540680247,1948284250,1701209449,793135392,1330529865,1700146516,1751348082,1952998241,1853189221,168632679,540554033,1227104314,1178944582,1701080864,1227104370,1162104390,1701191750,561278056,858851853
Long fehler#,1356=540680249,1948284250,1701209449,1179198496,793134404,1313229092,759579972,1936876886,1667328099,1818588264,560426613,875629069,540680240,1162626387,1713394755,1953261669,822742305,975188276,544561696,1717922164
Long fehler#,1436=1163075685,1413694796,1919243821,1634231155,1702127715,1735292268,822742305,975188532,1145980192,1162626387,1646285891,539916154,1162368079,1397315410,1768824901,544499811,1969644903,1852138606,822742305,975188788
Long fehler#,1516=1145980192,1162626387,1847612483,1952998249,1717921568,1701080693,168632686,540292145,1380261946,1347571538,541282130,1751345518,1701257332,1684960614,220294757,892612874,1444952608,1634300513,1852140642,544242036
Long fehler#,1596=543778146,542261590,1751345518,1919230068,1651859820,168639092,540423217,1968054330,1968840818,1936287095,543649397,1953786221,544435301,676808014,1919229993,1651859820,168639092,540488753,1633034298,1650551154
Long fehler#,1676=1679844716,1701867631,1679848556,1634495333,1919248754,168639092,540554289,2034507834,1768776046,1701340019,1698832499,1667851634,1918989160,544825714,1751345518,1919230068,1651859820,168639092,540619825,2034507834
Long fehler#,1756=1768776046,1701340019,1916870771,544825714,544502633,1684957541,1852140905,1852795251,220294241,808792330,1142962720,1835101817,1751348073,1092645733,2036429426,1768251936,1347307808,1847612501,1952998249,1819436320
Long fehler#,1836=1952609633,822742330,975188277,1112888096,1396788291,1330794579,1768824899,544499811,1969644903,1852138606,822742305,975188533,1112888096,1396788291,1330794579,1701650499,1629516392,1696625516,1634561641,1870012524
Long fehler#,1916=1851877490,560883044,892406285,540680243,1330795077,1330794578,1701650499,1629516392,1768235123,1818324334,1919907360,1684955496,220294757,875901194,1310734880,1763734133,1431511150,1095516994,1380995923,1696613199
Long fehler#,1996=1969319026,220296290,892678410,1142962720,1280202575,1178878287,541412425,1701995874,796095593,1751347054,1953194272,220296809,909455626,1428175392,1828480878,1701276020,1632444530,2020176500,1701859117,1869898098
Long fehler#,2076=168639090,540489009,1851072570,1953299559,1919248233,1701859104,1869898098,168632690,540554545,1851072570,1953299559,1936025449,1936868640,2054845537,1751345509,221933157,960049418,1109408288,1751475813,1685004396
Long fehler#,2156=1176531557,1953197685,544108393,1685219703,1667853856,1830843496,544368741,1702129269,-59477134,980712052,808585741,540680240,-60330411,1734964332,1176531557,1953197685,1936617321,1953654135,839519521,975188272
Long fehler#,2236=1986610208,1869181801,1969496174,543712114,168632624,540160050,1631985722,1751348076,1411412581,1713401977,1142977276,608390996,168632608,540225586,1631985722,1751348076,1411412581,1713401977,1126200060,608456532
Long fehler#,2316=168632608,540291122,1951604794,1735289202,1684949293,1763735653,1008759923,555757856,808585741,540680245,1935832403,1852404340,1917726055,1953720608,824196128,168632608,540422194,1867718714,1701410336,1159751020
Long fehler#,2396=1701668204,543519854,1684957555,1667853856,1679848552,168632673,540487730,1698832442,1667851634,1919382376,1702522469,1700985888,1751348082,1953786226,221933157,942682634,1260403232,1634561391,2054120558,1701603685
Long fehler#,2476=1918988398,1952804193,1713402469,1953261669,839519521,975190320,1952531488,1847617893,1952998249,1717921568,1701080693,168639086,540029234,1631854650,1852401012,1701670261,1768824946,544499811,1696623977,1969319026
Long fehler#,2556=1852142690,1919238688,1751345509,839519521,975188273,1918980128,1952804193,1635414629,1830841448,544437109,1936291706,1852139619,1965043744,824206446,1768693813,1852139365,839519521,975188529,544561696,1768842615
Long fehler#,2636=1632641127,1701667186,561145204,825362957,540680243,1802401094,1852795252,1735549299,1852140917,1701191796,561278056,825362957,540680244,1852400971,1633296485,221932648,892416522,1444952608,1634300513,543517794
Long fehler#,2716=1751345518,1701060724,1918987371,1953654121,839519546,975189553,1818314272,1701340019,1632641138,1701667186,1953654132,221933689,925970954,1394620960,1667851632,544367976,544406630,1702129225,762471783,1769103702
Long fehler#,2796=1701601889,1919230062,-160930957,561276528,825362957,540680248,1768255571,1919248483,1929143840,1852787744,1953384807,1918981677,1818386793,1696624229,1751348082,1952870646,839519521,975190321,1701860128,1701340009
Long fehler#,2876=-60415886,1951604850,1735289202,1918981677,1818386793,1696624229,1751348082,1952870646,839519521,975188018,1701860128,1701340009,-60415886,1816535154,762601839,1769103702,1701601889,1919230062,-160930957,561276528
Long fehler#,2956=842140173,540680241,1919476823,543452773,544367972,1668641348,1937072491,1700946279,1919252000,1702129506,168639086,540160562,1866604602,1768824952,544499811,1701736041,1818323058,1701060706,1699094643,1702130542
Long fehler#,3036=220296050,858927626,1310734880,1952540517,543520361,1936614726,1735550324,1709176434,839519521,975189042,1329809696,1768824910,544499811,1752330102,1701080673,168639086,540357170,1128865850,1847610959,1952998249
Long fehler#,3116=1919907360,1684955496,539061861,1920290344,774778912,168634676,540422706,1699094586,1919249512,1768251936,1919247392,1852132640,1936877052,1819043188,560426613,842140173,540680247,1948284250,1701209449,1852132640
Long fehler#,3196=1919252220,1634231155,1702127715,1735292268,839519521,975190066,1953055264,544235885,1751345518,1634476148,1918984804,839519546,975190322,1953055264,544235885,1852731243,1847616884,1952998249,1936025376,1667851632
Long fehler#,3276=1953654120,1919252256,980313444,858917389,540680240,1936880963,1847620207,1952998249,1919907360,1684955496,539061861,1920290344,774778912,220804657,825438730,538982944,1734692384,1986622561,1816469605,1852140901
Long fehler#,3356=1931502964,543452777,1751345518,1919230068,1651859820,168632692,540160818,1968840762,1701410336,1159751020,1701668204,560297070,858917389,540680243,544432452,1835363397,544501349,1952606567,544433440,1751345518
Long fehler#,3436=168632692,540291890,1699094586,1919249512,1768251936,1919247392,1852789792,1702523493,1853187957,168632679,540357426,1917067322,1701536629,1936269422,1768824948,544499811,1818752621,560489321,858917389,540680246
Long fehler#,3516=1818780998,1646293605,1679845733,1210085989,1130656353,561606767,858917389,540680247,544367940,1701209410,1931504744,1954182245,1852400928,1852130848,1919251571,1919907360,1937072498,839519521,975190067,1920226080
Long fehler#,3596=1701277289,543515758,1818781030,168632692,540619570,1884495930,1751345509,1713402469,1109422844,1768256101,762538083,1769103702,1701601889,1919230062,-160930957,561276528,875694605,540680240,1998615898,1734962789
Long fehler#,3676=1701860128,1701340009,-60415886,1698832498,1667851634,1445819240,1634300513,560295010,875694605,540680241,1701995842,1936221033,1769103734,1701601889,1953720608,1919246880,1937008997,1296647200,1769172581,1701408367
Long fehler#,3756=220296306,842281482,1428175392,1828480878,1701276020,1699094643,1702130542,1632120178,1701602414,839519521,975188788,1919238688,1751345509,1918989939,1818386793,1936269413,1768824948,544499811,1699563844,1869181806
Long fehler#,3836=1919248750,168632692,540292146,1698963514,1700012146,1881175160,544530273,1751345518,1869291636,1701605485,1763734644,1768169582,1698832485,1667851634,1635152744,1650551154,220292460,892613130,1142962720,1344300393
Long fehler#,3916=1835102817,1919251557,1818780026,1953396000,1668510309,1684628840,1931506789,543712105,544108406,544367972,1634885968,1702126957,1936024178,1701996643,1853186665,168632679,540423218,1851072570,1953299559,1919248233
Long fehler#,3996=1886999584,544106784,544367972,1634885968,1702126957,1936024178,1701996643,1853186665,168632679,540488754,1699094586,1919249512,1768251936,1632378989,544105828,544367972,978078788,875694605,540680248,1802401094
Long fehler#,4076=1852795252,544106784,541871172,1751345518,1870012532,1684955496,221933157,959721994,1512061472,1668508023,544105832,1380013139,1229017172,1160729678,1095779406,542395977,1651664246,1852142703,839519546,975188021
Long fehler#,4156=1413829408,1162692948,1701191762,561278056,892471821,540680241,544367940,1162692948,1936269394,1668489332,544108392,1735289189,1702130533,561278060,892471821,540680242,-59873971,1953720608,1667853856,1814066280
Long fehler#,4236=1633838177,168639090,540226866,1884495930,1751345509,1713402469,1092645628,2036429426,1918981677,1818386793,1696624229,1751348082,1952870646,839519521,975189045,2019642656,1818324329,1701995552,1766072425,1936614765
Long fehler#,4316=1701736297,1919230062,1651859820,168632692,540357938,1816862778,1701670241,1847619186,1952998249,1937072416,1870095719,980313447,892471821,540680246,1981838682,1701602665,1920226080,1970563957,1918989938,1818386793
Long fehler#,4396=221933157,926233098,1176517152,1701603429,1852383346,1920226080,1970563957,1717920882,1953066601,980316009,892471821,540680248,1981838682,1701602665,1920226080,1970563957,980313458,892471821,540680249,1970435155
Long fehler#,4476=1920300139,1667853856,1679848552,1852401253,1953654121,839519546,975188022,1717912608,1953066601,544108393,1210084713,1701077349,1701191794,980708456,909249037,540680241,1700949589,1852727659,544433524,1634038339
Long fehler#,4556=1328375156,1801808482,168639092,540161586,1851072570,1634428258,1702129262,1666392178,1953259880,221934181,859189770,1428175392,1801806446,1953394273,1968382053,1853187682,1869182059,839519598,975189046,1735284000
Long fehler#,4636=1769237756,1461740903,1162627400,1347374924,1918980141,1952804193,220295781,892744202,1142962720,1701867631,1919251564,1835093536,1852383333,1920226080,1970563957,1685004402,1260417637,1936941420,168639077
Long fehler#,4712=540423730,1766072378,1700929637,1952608869,1816862821,1702064993,1937075488,1851859059,1936876832,544367988,1818588243,1931502956,1701340532,168639086,540489266,1699553338,1685022836,1701191781,980708456,909249037
Long fehler#,4792=540680248,2054124112,1920296037,1667853856,1730180200,1853187685,980313444,909249037,540680249,1852400971,1701996064,544367977,1280065859,1262698818,1953066272,1919247392,2003134240,1668509436,1852142696,1918980128
Long fehler#,4872=1952804193,1635414629,220294248,808923658,1260403232,544106853,1919382874,543581801,543585633,1668506983,2054487144,1159751028,1852139369,1634231155,1294955622,1869116517,221930852,825700874,1159739936,543518313
Long fehler#,4952=1970435155,1920300139,1851878176,1701519470,543518313,1935764555,1696621939,1852138098,839519546,975188535,1701859104,1769234802,1847619183,1952998249,1718968608,1784827680,1702128485,2003722528,1650749029
Long fehler#,5028=221934177,859255306,1444952608,1634300513,543517794,1751345518,1852383348,1920226080,1970563957,1870012530,1851877490,980313444,926026253,540680244,1701275973,1751348078,796157537,1752458573,543515759,1751345518
Long fehler#,5108=1852383348,1784827680,544500581,1752330102,1701080673,168639086,540358450,1968840762,1936287095,543649397,543585633,1936025956,1327526757,1801808482,1768824948,544499811,1818752621,979919721,926026253,540680246
Long fehler#,5188=1970435155,1920300139,2004509216,1698832430,1667851634,1970937960,1701604128,221933161,926364170,1428175392,1801806446,1953394273,1092645477,2036429426,980449652,926026253,540680248,1702327642,1853191017,1970151527
Long fehler#,5268=1969299570,1853169766,1701669220,1869181806,1919248750,1109419380,1768256101,1987274851,1634300513,543517794,1818752621,979919721,926026253,540680249,1818780998,1763734117,1364402286,1849765196,1936287095,560426613
Long fehler#,5348=942803469,540680240,1802401094,1852795252,1667853856,1629516904,1679844981,1702061417,1699094643,1702130542,1784835954,544500581,1702325857,1633838190,168632690,540096562,1851072570,1634428258,1702129262,1650729075
Long fehler#,5428=1952795949,1701080936,839519546,975188536,1935754272,1920090400,1881176417,544530273,1751345518,1869291636,1701605485,1763734644,1768169582,1766596709,560297075,942803469,540680243,544106821,1701995842,1936221033
Long fehler#,5508=1634890337,1936269433,1768431732,1847620197,1952998249,1819436320,1952609633,839519521,975189048,1751467552,544367980,1377856873,1819633509,1852142308,1937064224,1668641380,168639083,540358706,1867718714,1701410336
Long fehler#,5588=1344300396,1835102817,1919251557,1651074848,1936007284,1667853856,221148264,909652490,639646240,1701080649,1936269432,1970151540,1852383346,1852400928,1092645477,2036429426,2004179501,1970497893,1696622446
Long fehler#,5664=1969319026,221148258,926429706,1293957664,1769108577,1968844152,1936287095,543649397,1919248744,1667853856,1830843496,1768712182,221145187,943206922,1092631072,2036429426,2053456429,1751345509,544367982,1635218021
Long fehler#,5744=1952806002,839519546,975190328,1768243744,1092642148,2036429426,-59957133,1852142451,1852138528,1818587936,544105826,544242004,1700946280,168632686,540031282,1631854650,1968250995,762080357,1634890305,1634738297
Long fehler#,5824=1847620831,1952998249,1836018464,1952803952,1852383348,1935762464,1701403168,1916874092,561602930,959580685,540680241,1634890305,1968844153,1936287095,543649397,1919248744,1667853856,1830843496,1768712182,221145187
Long fehler#,5904=842609162,1142962720,1835101817,1751348073,1916870757,1937334642,1768251936,1413565728,1667853856,1696625768,1969319026,221934690,859386378,1428175392,1801806446,1953394273,1226863205,1380275278,1413694803
Long fehler#,5980=1886999597,839519546,975189049,1920090400,1713404257,1512076028,1768257397,1735292275,-545952480,1836021280,1701603104,1701340009,2035556462,1702043760,221933161,892940810,1428175392,1299342707,1634956133,1847616871
Long fehler#,6060=1952998249,1919907360,1684955496,220294757,909718026,1428175392,1828480878,1701276020,1866866802,1952542066,1920226093,560426601,959580685,540680247,1700949589,1852727659,544367988,1919317313,1869440629,980645220
Long fehler#,6140=959580685,540680248,1635018061,1701603686,1667853856,1814066280,1633838177,168639090,540028979,1631854650,543778164,1852727659,1667853856,1730180200,1936026725,1998614117,1701081701,168639086,540094515,1631854650
Long fehler#,6220=543778164,1852727659,1667853856,1696625768,1969584754,1998615655,1701081701,168639086,540160051,1699094586,1919249512,1768251936,1699487853,980313459,808651277,540680243,1818780998,1646293605,544041317,1919443795
Long fehler#,6300=1700948325,168639086,540291123,1380982842,909198927,1163412782,1667853856,1629516904,-60394635,1633841768,1685004402,1713402469,1953261669,856296737,975189296,1195725344,1381258057,168639065,540422195,1631854650
Long fehler#,6380=543778164,1751345518,1701257332,1684960614,221933157,925905674,1176517152,1953721957,1651470949,1953195370,1667853856,1981838440,1634234991,1852138606,856296737,975190064,1952531488,1797286245,544108129,1751345518
Long fehler#,6460=1869291636,1919248752,1702305908,1852138610,856296762,975190320,1735284000,1769237756,1142973799,1768256609,856296762,975188017,1768246048,1919295598,1936025957,1952531488,1210935653,1818521185,168639077,540094771
Long fehler#,6540=1766203450,1766220910,611611506,1751475744,221148268,808792842,1226848800,1919251566,1987339630,1768059493,1853187182,1768824935,544499811,1818752621,979919721,892537357,540680241,541872725,1852731243,1847616884
Long fehler#,6620=1952998249,-161126624,1701733990,1702305908,1852138610,873073978,975188016,1701859104,541869934,544502633,1751345518,1852383348,1634301033,1769171308,561279589,808716813,540680241,1769366852,1869309283,2019914862
Long fehler#,6700=-60415884,1884233842,1279749733,1852795680,543519854,1751345518,1919230068,1818588275,1998615660,1701081701,168632686,540160052,1699422266,1881173609,1702064993,1936024686,2020167712,1868983397,1952542066,1929143840
Long fehler#,6780=1701859104,541869934,1969644903,1852138606,873073953,975188784,1701859104,759973742,1702390096,1919903340,544498029,1852727659,1667853856,1730180200,1952805733,1998615674,1701081701,168632686,540291124,1884233786
Long fehler#,6860=1279749733,1852133933,1802659172,1702129263,1797289080,544108129,1751345518,1919230068,1735746938,1702305908,1852138610,873073953,975189296,1701859104,759973742,1684956498,1869312613,2019914862,1634410612,1847619182
Long fehler#,6940=1952998249,1953194272,1701410409,1998615666,1701081701,168632686,540422196,1851072570,1953299559,543516521,1954047316,1143829109,1768256609,873073978,975189808,1751467552,544367980,1478520425,759973712,1702125892
Long fehler#,7020=168639081,540553268,1347952698,1143819335,1852142689,1667853856,1730180200,1853187685,778986852,808716813,540680249,1981838682,1701602665,1196447776,1631857996,1701406068,1701257326,1701077356,168632686,540029236
Long fehler#,7100=1851072570,1953299559,1919248233,1196447776,2035559756,168639088,540094772,1851072570,1953299559,544367975,1701470799,2037675115,168639088,540160308,1851072570,1953299559,543516521,1279742040,1836404269,561145197
Long fehler#,7180=808782349,540680240,1128416335,1953720608,1667853856,1763734632,1769236846,1936288865,1953654121,889851169,975188272,1751467552,544367980,543778146,544367972,1128416335,1768835373,1818323316,1701409641,1735292274
Long fehler#,7260=889851169,975188528,1111772960,1279536707,1768824908,544499811,1969644903,1852138606,889851169,975188784,1111772960,1699097923,1919249512,808782349,540680244,2054480979,1700929637,1700950625,1952805993,889851169
Long fehler#,7340=975189296,1701859104,1769234802,1696624239,1819240050,1768256103,220293219,909128970,1159739936,1650812786,1685285230,1768256609,1851878176,1768824942,544499811,1727423847,1952804454,1919252256,560883044,808782349
Long fehler#,7420=540680247,1730180442,1709141874,1735542048,1768841829,1852140915,220292455,808465930,1679833632,1699097922,1919249512,906628410,975188272,1952531488,1847617893,1952998249,1717921568,1701080693,906628462,975188528
Long fehler#,7500=1886340128,1953260912,1176531557,1852075109,224750945,858797578,1428175392,1828480878,1701276020,1818576416,1860463716,168650087,540291126,1851072570,1953299559,543516521,1769628996,1936482669,1819043188,168652389
Long fehler#,7580=540356662,1850286138,762864996,1702125892,1768824937,544499811,1327525481,1970168946,168650606,540422198,1699094586,1847616620,1952998249,1717921568,1701080693,906628462,975189808,1952531488,1634625893,1713399149
Long fehler#,7660=1701603429,1717659762,906628468,975190064,1751339808,1936981100,1701211237,1847616620,1952998249,544106784,1852076623,224882293,959460874,1411398176,1818583649,1852728684,1701670261,1768824946,544499811,1696623977
Long fehler#,7740=1969319026,1852142690,1919238688,1751345509,906628385,975188017,1650545696,1701604453,1836412526,544367981,1751347054,1667853856,1981838440,1701278309,560883042,825625101,540680241,1836216134,1847618661,1952998249
Long fehler#,7820=544106784,1852076623,224882293,842085898,1176517152,543452261,1835623778,1936018464,1847619173,1952998249,1717921568,1701080693,906628462,975188785,1818576416,1836412516,544367981,1835623778,1936018464,1847619173
Long fehler#,7900=1952998249,1717921568,1701080693,906628462,975189041,1818576416,1970937956,1666392173,1768256104,544105826,1751345518,1701257332,1684960614,168652389,540356918,1699094586,1970168940,1919249773,1836415520,1751339808
Long fehler#,7980=1651074418,1847619173,1952998249,1717921568,1701080693,906628462,975189553,1684949280,1143830629,1768256609,1701667182,1751475744,1752327532,980706913,825625101,540680247,-60330411,1734964332,1766137957,1650550638
Long fehler#,8060=168639077,540553526,1933910074,1953720608,1768254240,1411409262,1818583649,1730176364,1718023781,561276270,809044493,540680240,1936025924,1109422693,1751475813,1936269420,1852383348,1919247392,1634226976,1635214706
Long fehler#,8140=1702258034,1869181810,1768824942,544499811,1752330102,1701080673,168632686,540094521,1968054330,2021138546,1512077432,1701603685,1769152622,1696621678,1969319026,539063394,1867196448,1952542061,543318304,1869762648
Long fehler#,8220=544104806,1847603505,1952998249,1751477536,1870012530,220799346,842021130,1512061472,1701603685,544569888,1735287148,1634543648,857747064,926299954,1768249888,1852139619,168632617,540225593,1313415226,1146440771
Long fehler#,8300=1631857989,543778164,1751345518,1701257332,1684960614,220294757,875575562,1226848800,1431061326,1445807428,1668510309,1751343464,1970038132,1981835118,1868722789,560883060,809044493,540680245,1852400971,-60350363
Long fehler#,8380=1734964332,1347952741,1634103154,1631854702,560555380,809044493,540680246,1735357008,1835884914,1702125924,1701191785,1919249512,1952866664,956960033,975188785,1095059488,760366404,1702125892,1768824937,544499811
Long fehler#,8460=1969644903,1852138606,956960033,975189041,1095059488,760366404,1936876886,1667328099,1818588264,543649397,1651664246,1852142703,956960033,975189297,1229870368,1631858004,543778164,1751345518,1701257332,1684960614
Long fehler#,8540=220294757,909195530,1428175392,1935765614,1684956531,1968316517,1835627630,1700146533,1869181810,168632686,540621113,1917853754,1634887535,1629515117,1650812770,1751347058,220294757,10
fehlercode&=Create("Listbox",%HWND,"",100,100,300,300)
clearlist
text$=String$(fehler#,0)
Move("StrToList", text$,chr$(13))
Move("ListToHandle",fehlercode&)
zaehler%=GetCount(fehlercode&)
Print "Anzahl Einträge in Listbox: ";zaehler%
SelectString(fehlercode&,-1,"201")
Print GetString$(fehlercode&,GetCurSel(fehlercode&))'funktioniert nicht !!!!
Print GetString$(fehlercode&,61)'funktioniert....
'--------------------------------

WhileNot Ende%

    Waitinput

    If %key=2

        Ende%=1

    Endif

EndWhile

End
'--------------------------------------------------------------------------------------------------

ErrorProc

    Set("ErrorLevel", 1)
    fehlerart%=%Error
    fehler%=%ErrNumber

    if Fehlerart%=1

        Fehler$=Fehler$+"Warnung, "

    Endif

    if Fehlerart%=2

        Fehler$=Fehler$+"Fehler:"

    EndIf

    wf$=STR$(fehler%)
    SelectString(fehlercode&,-1,wf$)'hier wird nicht der richtige Wert ausgelesen...
    Fehlertext$=getString$(fehlercode&,GetCurSel(fehlercode&))'hier liegt der Hase im Pfeffer...
    Fehler$=Fehler$+fehlertext$+" "
    Fehler$=Fehler$+"in Zeile "+str$(%ErrLine)+"  "
    Fehler$=Fehler$+" -- Betrifft: "+$ErrStr
    Fehler$=Fehler$+" in Datei: "+$ErrFile
    Messagebox(Fehler$,"ERROR",16)
    Set("ErrorLevel", -1)
    clearlist
    destroywindow fehlercode&

EndProc

XProfan X4
Xprofan X4
Rudolf Beske / München

Hardware: NB Intel I9 - 16GByte RAM

08.04.2021 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

E.T.

Irgendwie scheitert schon das SelectString , es wird in der Liste ja nichts ausgewählt und dahin gescrollt (so, wie es SelectString ja eig. machen sollte).

Aufgefallen (siehe Bild):
Irgendwo "hängt" da ein <Enter> im String, bei der funktionierenden Ausgabe (Print GetString$(fehlercode&,61)'funktioniert.... ) wird immer eine Zeile runter gesprungen (deshalb hatte ich die Ausgabe mal um A: und B: erweitert, um zu erkennen, wo die Leerzeile herkommt).

Könnte dies von Zeile 120: Move("StrToList", text$,chr$(13)) kommen ??
Wenn ich es recht im Sinn habe, ist chr$(13) doch <ENTER>, womit du arbeitest.

aaa.jpg	153 kB

Hochgeladen:	08.04.2021

Ladeanzahl:
		Herunterladen

Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

08.04.2021 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

E.T.

So, zum Feierabend mal noch bissel Denksport betrieben

Die Listbox mal sortiert, und den (201-) String "händisch" per Addstring in die Liste eingefügt. So wird dieser Eintrag auch gefunden.
Was mich stutzig macht: der nachträglich eingefügte Eintrag wird ganz unten in der (sortierten) Liste eingefügt. Es sieht (zumindest optisch) auch so aus, als wäre VOR deinen erzeugten Einträgen noch irgendein (nicht darstellbares ??) Zeichen.

Hab jetzt aber "keinen Bock", deine ganzen Long's, wo du die Daten schreibst, auseinander zu nehmen

bbb.jpg	96 kB

Hochgeladen:	09.04.2021

Ladeanzahl:
		Herunterladen

XProfan 11
Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

09.04.2021 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

RudiB.

Kurz zu der Erstellung der Datenliste mit dem Datengenerator. Habe mir die Fehler-Codes aus der XProfan-Hilfe rauskopiert und in eine Textdatei gepackt.
Hab sie auch mal angehängt.....
Und zu dem Chr$(13). Bei dem Befehl Move("StrToList",Listbox,Delimiter) wird ja wie in der Hilfe beschrieben eben ein Delimiter gefordert und es funktioniert auch nur mit dem Chr$(13)/Return. Aber das scheint den Fehler zu verursachen, denn konventionell aus der Datei lesen und mit AddString zur Liste hinzufügen funktioniert ohne Probleme.
Habe auch gerade mal die Stringlänge geprüft und zum Test mal mit Left$(String,Len(String)-1) probiert....und die Liste mit Deletestring/Insertstring aktualisiert,aber da wird tatsächlich nur das letzte Zeichen abgeschnitten. Keine Änderung...
Jetzt hab ich den Fehler gefunden, dank Deinem Hinweis .......................

Es sieht (zumindest optisch) auch so aus, als wäre VOR deinen erzeugten Einträgen noch irgendein (nicht darstellbares ??) Zeichen.

Die Lösung:

Kompilieren Markieren Separieren

Whileloop Getcount(fehlercode&)

    text$=GetString$(fehlercode&,&loop-1)
    Text$=Right$(text$,Len(text$)-1)
    locate 1,1
    Print text$;"                       "
    DeleteString(fehlercode&,-1)
    addstring(fehlercode&,text$)

EndWhile

SelectString(fehlercode&,-1,"504")
Print GetString$(fehlercode&,GetCurSel(fehlercode&))'Jetzt funktioniert es!!!!
Print "Fertig"

Schon merkwürdig.....
Danke aus München
Rudi

fehlercodes.txt	9 kB

Hochgeladen:	09.04.2021

Ladeanzahl:
		Herunterladen

XProfan X4
Xprofan X4
Rudolf Beske / München

Hardware: NB Intel I9 - 16GByte RAM

09.04.2021 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

H.Brill

Du mußt bei Move("StrToList", ...)
den Trenner auf CRLF umstellen.
Also :

Kompilieren Markieren Separieren

Move("StrToList", text$,chr$(13) + Chr$(10))

Ansonsten hast du das Chr$(10) immer am Anfang von den
Strings in der Listbox. Wenn du mir nicht glaubst, kannst ja mal
den Code so lassen und mit

Kompilieren Markieren Separieren

SelectString(fehlercode&, -1, Chr$(10) + "201")

suchen. Das blöde ist, daß man das Chr$(10) in der LB nicht
sieht.

Ist halt so eine Eigenart von den Zeilenumbrüchen mit
Chr$(13) + Chr$(10). Wenn man es nicht weiß, sucht
man sich einen Wolf.

Also, alle Strings, die aus einer Datei kommen oder mit einem Editor
bearbeitet wurden, haben dieses cr+lf am Ende.
Wird auch harter Zeilenumbruch genannt.

09.04.2021 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

RudiB.

Danke....again wat lörnt

Ja da wäre ich im Leben nicht drauf gekommen.
Aber für die Zukunft werde ich bei solchen Sachen/Fehlern auch auf Steuerzeichen achten...

Nochmals Danke und Gruß aus München
Rudi

XProfan X4
Xprofan X4
Rudolf Beske / München

Hardware: NB Intel I9 - 16GByte RAM

09.04.2021 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren