Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

как преобразовать 'array' и 'caption'?


Страницы:   1 2

inviz ©   (2008-12-28 21:03:00) 

здравствуйте! Как решить проблему перевода одного типа данных в другую, пишу:

datatemp = record
   name:array[0..255] of char;
   ...
end;
   ...
datatemp[0].name:=edit1.Text;    - тут ошибка

пишет Incompatible types: 'Array' and 'TCaption'
тоесть несоответствие типов 'массив' и 'надпись'
как преобразовать? пробовал datatemp[0].name:=PChar(edit1.Text)не помогает,
datatemp[0].name:=PAnsiChar(edit1.Text)тоже не помогает, пробовал datatemp[0].name:=PWideChar(edit1.Text)
тоже не помогает что делать? :(

з.ы. Пишу в CodeGear RAD Studio Delphi 2009


inviz   (2008-12-29 04:47:00) [21]


> А зачем вообще тут нужен array? Почему не использовать

а файл в который пишу запись нетипизированный


Германн   (2008-12-29 01:16:00) [22]


>  name:array[0..255] of char;

А зачем вообще тут нужен array? Почему не использовать
name : ShortString;?
И тогда вообще никаких проблем.


DVM   (2008-12-28 21:51:00) [23]


> inviz   (28.12.08 21:39) [2]

вот тебе туда и обратно:

procedure TForm1.Button1Click(Sender: TObject);
var
 name: array[0..255] of char;
 s: string;
begin
 Move(Caption[1], name[0], 256 * SizeOf(Char));
 s := name;
 Label1.Caption := s;
end;


inviz   (2008-12-28 21:39:00) [24]

Благодарю. Частично работает ))
пишу:

 s:=edit1.Text;                                                  
 Move(s,datatemp[0].name,length(edit1.Text));    
 showmessage(datatemp[0].name);
 m:=datatemp[0].name;
 showmessage(m);


выдает каля-баля несмотря на то что текст в s до операции Move()
отображается нормально...


DVM   (2008-12-28 21:24:00) [25]


> что делать? :(

Move()


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо