[BBBCat]

Да, извиняюсь, про Delphi 7 просмотрел. А для чего тут-то SetString? Можно просто s := 'hello'. Но вопрос был не об этом. Вопрос: почему без FillChar выдаёт Access Violation? И, кстати, если написать так

Код:

procedure TForm1.FormShow(Sender: TObject);
var
  s: String;
begin
  s := 'hello';
  ShowMessage(s);
  P := GetMemory(SizeOf(TData)) ;
//  FillChar(P^, SizeOf(TData), 0);
  with TData(P^) do
    SetString(FText, PChar(nil), 30);
end; // procedure TForm1.FormShow(Sender: TObject)

то Access Violation не выдаёт! Почему?