Lipsește un operator sau virgulă
Lipsește un operator sau virgulă
Bună ora din zi,
Sunt aici eaeaya problemă. lua # XA0, de la modul de a lucra cu HELP DateToStr: Label1.Caption: = „Astăzi este # XA0; „+ DateToStr (data);
Când compilați un mesaj de eroare:
[Eroare] Unit1.pas (274): Lipsește un operator sau virgulă
Eroarea nu este aici, prezintă o mulțime de cod, cea de mai sus
prost copiate, copia din nou, totul funcționează
Procedura TForm1.Button1Click (Expeditor: TObject);
începe
Label1.Caption: = „Astăzi este # XA0; „+ DateToStr (data);
se încheie;
Ce este în această linie.
> Label1.Caption: = „Astăzi este # XA0; „+ DateToStr (data);
Aici, totul este în ordine. Priviți cu atenție dacă tot începe „s și de sfârșit“ s
Toate cec, curat sau a elimina această linie nu există probleme
Ei bine, ne putem aștepta până să vă aducă cod mai detaliat, dar cu atât de mult nu așteptați, filiala va merge la arhiva
Glumești, sau în cazul în care? Ei bine, în loc de a scrie această linie
Label1.Caption: = „Astăzi este # XA0; „+ DateToStr (data);
de exemplu, ShowMessage ( ":-) Works");
În cazul în care nu funcționează, atunci problema este cu Delphi, probabil.
Nu cu Delphi că obiceiul pentru toate vina pe dezvoltatorii Delphi, există mai mulți candidați demni.
Și ce tip de variabilă Data?
Eu cred că o tastatură rupt, și nu în altul.
Din câte știu eu întotdeauna atunci când uitați compilator virgulă Ragan pe linia de mai jos. Deci să se alinieze.
Da, bine :)
Procedura TForm1.FormCreate (Expeditor: TObject);
începe
# XA0; Label2.Caption: = „Astăzi este # XA0; „+ DateToStr (Data)
# XA0; Label1.Caption: = „Astăzi este # XA0; „+ DateToStr (Data); end;
Procedura TForm1.FormCreate (Expeditor: TObject);
începe
# XA0; Label2.Caption: = „Astăzi este # XA0; „+ DateToStr (Data)
# XA0; Label1.Caption: = „Astăzi este # XA0; „+ DateToStr (data);
se încheie;