Citazione Originariamente Scritto da Francario Massimiliano Visualizza Messaggio
Salve,
ecco un esempio di come ottenere gli oggetti corrispondenti alle leg della strategia.

dim under as TUnderlying
dim c17000 as TOption

under = CurrentStrategy.GetMainUnderlying()
c17000 = CurrentStrategy.GetByName("C @ 17000 03-2013")
if(under.Reference > c17000.Strike) Then
    c17000.Buy(2, MARKET)
End If
L'interpretazione dello script è la seguente:
Assegno alla variabile under l'oggetto che rappresenta il sottostante principale della strategia
Assegno alla variabile c17000 l'oggetto che rappresenta la leg il cui nome è "C @ 17000 03-2013"
Se
il prezzo di riferimento dell'oggetto under è maggiore dello strike dell'oggetto c17000
Allora
Compra 2 contratti di c17000 al prezzo MARKET


L'oggetto CurrentStrategy ha diversi metodi disponibili per ottenere gli oggetti che corrispondono alle gambe della strategia: GetByName (usando il nome visualizzato sulla finestra Strategy Builder), GetByIsin (usando il codice isin dello strumento), GetByID (usando il codice identificativo univoco degli strumenti), AddFuture, AddOption.

Quando si dichiarano le variabili con la parola chiave Dim, se si conosce in anticipo il tipo di dati che quelle variabili andranno a contenere, è consigliabile specificarlo.

Max Francario
per cortesia traduci l'esempio sopra in Pascal
grazie