Geschrieben von Uwe am 05.12.2002, 12:10:
Zitat: Original von gandalf
Hallo Uwe,
Vielen Herzlichen Dank für deine schnelle Antwort und Hilfe !! Danke !
Ich habe es probiert, am Anfang ist es leider nicht gegangen, da ein ":" gefehlt hat und ein "," vertauscht war, habe es kurz ausgebessert und stelle es hier nun kurz für alle anderen rein, die sich auch dafür interessieren:
INPUT: pColor(darkgreen), mColor(red), nachkomma(2);
vars: TXID(-1), strClose(""), close1(0);
strClose=NumToStr(close,nachkomma);
if TXID<0 then TXID=Text_New(date, time, close, strClose);
if TXID>-1 and LastBarOnChart then
begin
Text_SetString(TXID, strClose);
Text_SetLocation(TXID, date, time, close);
Text_SetColor(TXID, iff(close>close1,pColor,mColor));
Text_SetStyle(TXID,1,2);
end;
close1=close;
-----------------------------------------------------------------------------------------------------
eines habe ich leider noch nicht geschafft, nämlich den aktuellen Kurs rechts vom letzten Balken zu stellen. jetzt erscheint er immer links davon und verdeckt den vorrigen Chart-Verlauf.
Vielen 1000 Dank nochmals für deine Hilfe !!!
Gandalf
Danke für das Ausbessern und Testen. Die Lage des Position des Ansatzpunktes des ideelen Textfeldrahmens relativ zum Bar geg. durch Date, Time, wird über den Befehl Text_SetStyle(TXID, H, V) gesetzt. Mit der H=1 für die horizontale und V=2 für die vertikale Position dieses Punktes wurde also H=1=rechts und V=2=mittig gesetzt. Für H hätte also 0 stehen sollen:
Hier der Versuch der Beschreibung der Marken der Textbox und wie sie durch die Kombination H/V beschrieben werden:
code:
0/0-----2/0-----1/0
| |
0/2 Textbox 1/2
| |
0/1-----2/1-----1/1
Damit sollte der Versuch mit Text_SetStyle(TXID, 0, 2); gewagt werden um das Textfeld links vom Bar mittig zum Close (siehe Text_Location-Befehl) zu setzen.
Viel Erfolg!
Uwe
|