Советы по Delphi

         

Добавление даты и времени в компонент Memo


    { Следующий код вставляет значение даты/времени в memo-поле. }

Var
s : string ; begin
s :=  DateToStr( Date ) + ' ' + TimeToStr( Time ) + '  :' ; Memo1.Lines.Insert( 0,  s ) ; Memo1.SetFocus ; Memo1.SelStart := Length( s ) ; Memo1.SelLength := 0 ;

[001390]



Содержание раздела