Newsgroup: it.comp.lang.delphi
Titolo: Puntatore a variabile di tipo TDate

Buongiorno a tutti.
Qual è il codice per puntare al valore di una variabile di tipo TDate?
Conosco questi:
String(poiStringa^) := 'ciao'  ----------------- per puntare al valore
di una variabile tipo string
Integer(poiIntero^) := 1 ----------------------- per puntare al valore
di una variabile tipo integer
Boolean(poiVeroFalso^) := true ------------ per puntare al valore di
una variabile tipo boolean
ma non so come fare per le date...
?(Data^) :=
Altro dubbio (grave) è se un TMonthCalendar restituisce un TDate, un
TDateTime o un Double.

 TDateTime o un Double.
Sono certo che l'help di delphi, alla pagina sulla classe
TMonthCalendar
lo dice chiaramente! :)
ciao
G

Spiego meglio il mio problema:
su una Form ho diverse Edit (non proprio tedit, trattasi di un
componente aggiuntivo che mi tratta l'input delle date in modo
meraviglioso, non ricordo il nome adesso); premendo un tasto funzione
creo una Form Modale cui passo nel costruttore il puntatore a una mia
variabile, adesso di tipoTDate ma che ovviamente posso cambiare. La
Form modale ha un TMonthCalendar e 2 pulsanti (ok e annulla). Alla
pressione del pulsante ok vorrei ritornare alla variabile - tramite il
puntatore - la data selezionata, e riempire dunque l'edit
(eData1.Value := ValoreDouble).
Il problema, appunto, è che tipo di variabile usare e da passare, e il
codice da scrivere sull'evento ButtonOkClick della Form modale per
ritornare la data selezionata sul TMonthCalendar.

Aggiungi al form una property  in sola lettura che resituisce la data
del TMonthCalendar.
Poi, se il result di ShowModal e' OK, leggi il valore di quella
property e buonanotte.
A.


perdonami, non ho capito.
sulla form1 ho edit1 con data 04.11.2009, devo mostrare form2 modale
con Tmonthcalendar che visualizza 04 novembre 2009. l'utente cambia
data e preme ok.
Se la property è in sola lettura come faccio a passare il valore
selezionato?
Scusa l'ignoranza.

Mi ero perso un pezzo.. :-|
Type
  TFrom1 = class(TForm)
  ...
 public
    property SelectedDate: TDateTime read GetSelectedDate write
SetSelectedDate;
  end;
...
procedure TFom1.SetSelectedDate(const AValue: TDateTime);
begin
  MyCalendar.Date := AValue;
end;
function TFom1.GetSelectedDate(): TDateTime;
begin
  Result := MyCalendar.Date;
end;
Prima delle ShowModal, setti la property al valore corrente.
Sul result di ShowModal, se e' ok la leggi e la scrivi dove ti pare.
I form sono CLASSI. Niente ci impedisce di definire costruttori o
distruttori alternativi, aggiungere property metodi etc....
A.


Fra 20 minuti provo. Grazie mille.
Domanda OT come si fa a pagare una birra a chi ti aiuta qui sul forum?

 Scusa l'ignoranza.
Per quella c'e' sempre un rimedio:
http://www.marcocantu.com/epascal
http://delphi.about.com/od/course/Learning_Object_Oriented_Programming_with_Delphi_Free_Online_Course.htm
http://www.freebyte.com/programming/delphi/
e cosi' via..
ciao
-- 
Morde

 Domanda OT come si fa a pagare una birra a chi ti aiuta qui sul forum?
C'ï¿œ da fare un versamento/bonifico su un conto iban che ti posso 
fornire in privato... ;-)
Ciao
-- 
Morde

Ringrazio Salvati e ringrazio Morde.
Ho imparato due cose importantissime:
1) come funzionano le property
2) come evitare di complicarmi la vita con costruttori, puntatori e
casini vari
Giovanni

 casini vari
Questo ï¿œ il miglior post della giornata :-)
Grazie.
Ciao
-- 
Morde

Morde e Salvati, ho inviato un'email a entrambi ma non ho ricevuto
risposta.

 risposta.
La email che uso sul ng ï¿œ un'email fatta apposta per evitare lo 
spamming, cancella periodicamente tutto quello che ricevo.
Rimanda che oggi controllo prima del pruning.
Ciao
-- 
Morde

 Morde
fatto.
Saluti.

 Rimanda che oggi controllo prima del **** pruning ****
Un'altro potatore! Deve essere proprio la stagione ...
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Un'altro potatore! Deve essere proprio la stagione ...
Ragazzi quest'anno la vendemmia del Merlot sarï¿œ da ricordare.. annata 
ottima ;-)
^___^
-- 
Morde