Lieber Besucher, herzlich willkommen bei: INVESTOX-Forum. Falls dies Ihr erster Besuch auf dieser Seite ist, lesen Sie sich bitte die Hilfe durch. Dort wird Ihnen die Bedienung dieser Seite näher erläutert. Darüber hinaus sollten Sie sich registrieren, um alle Funktionen dieser Seite nutzen zu können. Benutzen Sie das Registrierungsformular, um sich zu registrieren oder informieren Sie sich ausführlich über den Registrierungsvorgang. Falls Sie sich bereits zu einem früheren Zeitpunkt registriert haben, können Sie sich hier anmelden.
Frieder
unregistriert
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »Frieder« (20. Mai 2005, 10:14)
Frieder
unregistriert
Frieder
unregistriert
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »Frieder« (20. Mai 2005, 10:24)
Frieder
unregistriert
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »Frieder« (20. Mai 2005, 11:19)
Steff
unregistriert
Frieder
unregistriert
Mikel
unregistriert
Frieder
unregistriert
Mikel
unregistriert
Frieder
unregistriert
Zitat
Original von Investox
Tai-Pan RT bietet übrigens bereits die Möglichkeit, komprimierte Daten herunterzuladen. Allerdings ist Inv. RTT auf die Realtimeaufzeichnung spezialisiert und speichert keine OHL-Kurse. Eine Möglichkeit wäre mittelfristig eine direkte Anbindung von Investox an Tai-Pan RT zum Auslesen von Historien.
Tai-Pan
unregistriert
Quellcode |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 |
Private Type Daten z() As Date v() As Long o() As Single h() As Single l() As Single c() As Single End Type Public Sub Future5MinLoad() Dim BarChart As New TaiPanRTLib.BarChart Dim x As Daten Dim i As Long ' SymbolNr Symbol Name ' ---------- ----------------------------- ----------------------------------------- ' 6059262 227028.DTB.LP TecDAX-Future ' 6059261 570569.DTB.LP DJ Gl.Titans-Future ' 6059260 720016.DTB.LP DAX-EX-Future ' 6059259 720017.DTB.LP ESTOXX50 Ex-Future ' 6059258 846959.DTB.LP DAX-Future ' 6059257 965236.DTB.LP STOXX 50-Future ' 6059256 965238.DTB.LP EuroSTOXX50-Future ' 6059253 965264.DTB.LP BUND-Future ' 6059252 965265.DTB.LP BOBL-Future ' 6059251 965266.DTB.LP Schatz-Future ' 6059255 965305.DTB.LP SMI-Future ' 6059250 965314.DTB.LP 3M-Euribor-Future ' 6059254 968312.DTB.LP Nemax 50-Future BarChart.loadData 6059258, -1500, 300 x.v = BarChart.Data2(TPRQuickAccessKursArtenVolume) x.o = BarChart.Data2(TPRQuickAccessKursArtenOpen) x.h = BarChart.Data2(TPRQuickAccessKursArtenHigh) x.l = BarChart.Data2(TPRQuickAccessKursArtenLow) x.c = BarChart.Data2(TPRQuickAccessKursArtenClose) x.z = BarChart.Data2(TPRQuickAccessKursArtenZeit) Selection.TypeText Text:="Datum_Zeit;Open;High;Low;Close;Volume" Selection.TypeParagraph For i = 0 To BarChart.Count - 1 Selection.TypeText Text:=x.z(i) & "; " & x.o(i) & "; " & x.h(i) & "; " & x.l(i) & "; " & x.c(i) & "; " & x.v(i) Selection.TypeParagraph Next End Sub |
Quellcode |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
Datum_Zeit;Open;High;Low;Close;Volume 10.05.2002 09:05:00; 4965; 4970; 4962,5; 4964; 231 10.05.2002 09:10:00; 4963,5; 4973,5; 4959,5; 4973; 618 10.05.2002 09:15:00; 4972; 4977,5; 4970,5; 4974; 462 10.05.2002 09:20:00; 4975; 4984; 4974; 4979,5; 334 10.05.2002 09:25:00; 4979,5; 4985; 4977; 4980; 424 10.05.2002 09:30:00; 4980; 4983; 4969,5; 4972; 338 10.05.2002 09:35:00; 4971; 4974,5; 4970; 4970; 186 10.05.2002 09:40:00; 4970,5; 4970,5; 4962,5; 4969,5; 328 10.05.2002 09:45:00; 4969,5; 4971,5; 4963; 4963; 353 10.05.2002 09:50:00; 4964,5; 4967; 4957,5; 4960; 193 10.05.2002 09:55:00; 4960; 4961,5; 4956,5; 4959,5; 462 . . . |
Mikel
unregistriert
Tai-Pan
unregistriert