L'ho personalizzato cosi:
Ma mi da questo errore:codice:procedure TForm1.CambiaClick(Sender: TObject); var buttonSelected : Integer; begin SysSetComputerName (PC.Text); StatusBar.Panels[2].Text:='Nome PC Cambiato' // Mostri un dialogo di conferma buttonSelected:= MessageDlg('Le Modifiche Diverrano Effettive Dopo Il Riavvio Del PC', mtWarning, mbOKCancel, 0); // Mostri il tipo di tasto selezionato if buttonSelected = mrOK then if not ExitWindows(EW_RestartWindows, 0) if buttonSelected = mrCancel then ShowMessage('Cancel pressed') then ShowMessage('Un programma rifiuta di chiudersi.'); end;
[Error] Email.pas(482): Missing operator or semicolon
Che fa riferimento a questa riga:
buttonSelected:= MessageDlg('Le Modifiche Diverrano Effettive Dopo Il Riavvio Del PC', mtWarning, mbOKCancel, 0);

Rispondi quotando