| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > Delphi: Общие вопросы > Перекодировка из DOS в Windows |
| Автор: Sazz 23.10.2012, 10:54 |
| Здравствуйте есть процедура для перекодировки данных в Мемо: procedure TForm1.Button2Click(Sender: TObject); begin GetMem(Str, Length(Memo1.Lines.Text)); Src:=Memo1.Lines.GetText; OemToChar(Src, Str); Memo1.Lines.SetText(Str); FreeMem(Str); end; end. Как переделать код, чтобы перекодировать значение только одной переменной, к примеру "а", значение переменной: DBGrid1.DataSource.DataSet.FieldByName('Ctipf').AsString; |