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

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

Передача данных из одной базы в другую. [D6, dBase, FoxPro]

Iscandersam ©   (2004-02-09 09:36:00) 

Здарвствуйте! Подскажите пожалуйсто как можно переписать с одной базы в другую поля даты в поля String. В базе выглядит вот так 15.12.2003 , а нужно чтобы выглядела вот так 15122003 желательно программный год. Прошу вас кто занет подскажите зарание благодарю!

---

Anatoly Podgoretsky   (2004-02-09 10:58:00) [1]

Или же ее более удобный представитель - функцию FormatDateTime, тогда это будет выглядеть красивее

// var s:string;
begin
showmessage(FormatDateTime("ddmmyyyy", date));
end;

---

sniknik   (2004-02-09 10:38:00) [2]

замена вышеприведенного
var s:string;
begin
DateTimeToString(s, "ddmmyyyy", date());
showmessage(s);
end;

---

DenK_vrtz   (2004-02-09 10:19:00) [3]

На вскидку разобрать строку, удалив из нее сепаратор.
var s:string;
begin
s:=datetostr(date());
while pos(dateseparator,s) <> 0 do
s:=copy(s,1,pos(dateseparator,s)-1)+copy(s,pos(dateseparator,s)+1,length(s)-pos(dateseparator,s));
showmessage(s);
end;

---

Наверх