24/10/09 7:28
camaleonteplus
quando si avvia questa riga:
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.HintColor := clOlive;
Application.HintHidePause := 3000;
Application.OnHint := StatusHint;
//Carica i contatti
CaricaClick;
//Carica La Info Lista Server
slConfig := TStringList.Create;
slConfig.LoadFromFile('server.ini');
for I := 0 to pred(slConfig.Count) do Server.Items.Add(slConfig.Names[i]);
//Carica i contatti
CaricaClick;
end;
vorrei eseguire anche il codice CaricaClick ma mi da questo errore:
[Error] Email.pas(312): Not enough actual parameters
Da questo errore capisco che ci mancano dei dati, io ho già fatto una cosa del genere prima ma mi sono servito del ciclo adesso in funzione semplice non so come applicarlo.
Ultima modifica effettuata da camaleonteplus 24/10/09 9:37
aaa
24/10/09 9:36
camaleonteplus
Grande questa volta c'è l'ho fatta da solo ho risolto cosi il programma:
CaricaClick(Sender);
Sto migliorando.
aaa