delphi网络资源总结,话了重点,方便阅读,记忆
Caption Label Default True procedure TForm1.Button1Click(Sender:TObject); type Tvowels=set of Char; var Vowels:TVowels; begin Vowels := ['a','e','i','o','u']; if Edit1.Text[1] in Vowels then Lable2.Caption := ' '; else Lable2.Caption := ' '; end; Edit1.Text[1] in Vowels in TVowels
2.1.10.3
implementation interface interface implementation procedure function implementation interface implementation uses
interface implementation udes implementation C B implementation A C