ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / MEMO в DBF
25 сообщений из 107, страница 2 из 5
  2  все
MEMO в DBF
    #33337217
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex11100
Гость
перевод строки в мемо chr(13)+chr(10)
...
Рейтинг: 0 / 0
21.10.2005, 12:45:48
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337232
Urri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Urri
Участник
Блин, вот раздули тему - а ради чего?

Короче говоря, не нужно бояться того, что при замене только одной строки фокс перепишет все блоки memo-поля, выделенные для текущей записи. Это совсем не страшно. И не долго.
...
Рейтинг: 0 / 0
21.10.2005, 12:50:08
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337254
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex11100
Гость
на этой неделе в фоксклабе
от человека был вопрос
как заменить мемо, не меняя положение блока
(для чего это необходимо - это проблемы человека)

если это все не про то
то реплейсте, какие проблемы
...
Рейтинг: 0 / 0
21.10.2005, 12:53:34
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337259
Недоходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Недоходящий
Участник
2 Urri
все равно придеться искать и заменять только одну строку
...
Рейтинг: 0 / 0
21.10.2005, 12:55:03
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337304
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex11100
Гость
что означает этот вопрос:

Задача такова: В мемо поле у меня 10 строчек. в пятой сторчке значение abcd. Как заменить только эту строчку на dcba при этом не переписывая по новой мемо-поле?


реплейс устраивает???
...
Рейтинг: 0 / 0
21.10.2005, 13:05:11
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337386
Недоходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Недоходящий
Участник
еще пока смотрю
...
Рейтинг: 0 / 0
21.10.2005, 13:28:36
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337400
Недоходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Недоходящий
Участник
НЕ очень.
получается после первого запуска на второй в переменную загоняется мемо-значения как единая строка, т.е. мемлайн подсчитывает как 1 строку в мемо-поле. И заменяется значение только на второй раз. Блин, что делать? есть еще какой нить способ?
...
Рейтинг: 0 / 0
21.10.2005, 13:31:39
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337507
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex11100
Гость
перевод строки в мемо chr(13)+chr(10)


этож тебе знаток фокса там процу советовал
твою проблему решить можно 2-мя строками
сейчас напишу
...
Рейтинг: 0 / 0
21.10.2005, 14:00:50
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337523
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex11100
Гость
Кусакин - великий знаток фокса, где тыть ау...
...
Рейтинг: 0 / 0
21.10.2005, 14:05:45
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337549
Кусакин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кусакин
Участник
Если кто нить обратил внимание на 0x0D, тот глупых вопросов больше задавать не будет и строки, якобы переползающие в другугой блок тож не будет так свирепо туда заталкивать. А за личную бестолковость я не отвечаю.
Как ты делаешь то, что я тебе посоветовал, с реальным примером? Mемки сюда, плиз. Вот тогда и будет разговор. А как можно, а как нельзя: можно машку - за ляшку, мля.
Извините, телепатией не обладаю.
...
Рейтинг: 0 / 0
21.10.2005, 14:13:12
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337567
Недоходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Недоходящий
Участник
Вот мемка .

4444
sdvfdsvfb23214
123asd
asdvcds
dsvsdv
...
Рейтинг: 0 / 0
21.10.2005, 14:17:59
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337572
Кусакин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кусакин
Участник
И что же не работает ?
...
Рейтинг: 0 / 0
21.10.2005, 14:18:45
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337582
Кусакин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кусакин
Участник
Проверил 5 раз, все работает.
Код сюда.
...
Рейтинг: 0 / 0
21.10.2005, 14:21:47
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337597
Недоходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Недоходящий
Участник
if not used ('temp')
use temp
endif
Select temp
m.fmemo = field_defa && ddd - это мемо поле, для теста
lnCountLines = Memlines(m.fmemo)
lcStr1 = ""
For i = 1 To lnCountLines-1
lcStr1 = lcStr1+ParsStr(@m.fmemo,Chr(0x0D))
Endfor
lcStr2 = ParsStr(@m.fmemo,Chr(0x0D))
lcStr2 = Strtran(lcStr2,"123asd","dsa321")
m.fmemo = lcStr1+lcStr2
? m.fmemo
Replace field_defa With m.fmemo
Return
...
Рейтинг: 0 / 0
21.10.2005, 14:26:08
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337620
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex11100
Гость
я сразу и обратил внимание на 0x0D

и 2 раза писал
перевод строки в мемо - 2 символа

и на код тупой
я 3мя строками сделаю
AT и STUF

пиши-пиши - сейчас козлить буду
...
Рейтинг: 0 / 0
21.10.2005, 14:33:17
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337658
Кусакин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кусакин
Участник
Вот так попробуй.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
IF !OpenTable("temp.dbf","temp")
	RETURN .f.
ENDIF
LOCAL  oData 
Select temp
SCATTER NAME oData
m.fmemo = oData.field_defa 
lnCountLines = Memlines(m.fmemo)
lcStr1 = ""
For i =  1  To lnCountLines- 1 
	lcStr1 = lcStr1+ParsStr(@m.fmemo,Chr(0x0A))
Endfor
lcStr2 = ParsStr(@m.fmemo,Chr(0x0D))
lcStr2 = Strtran(lcStr2,"123asd","dsa321")
m.fmemo = lcStr1+lcStr2
? m.fmemo
Replace field_defa With m.fmemo
RELEASE  oData 
Return

Procedure ParsStr
	Lparameter  CurrStr,pcDelimiter
	Local ln_Pos, ln_RetStr, lenDel,RetData
	lenDel =  Len(pcDelimiter)
	ln_Pos =  Atc(pcDelimiter, CurrStr)
	RetData = Iif(ln_Pos> 0 ,Substr(CurrStr, 1 ,ln_Pos- 1 ), CurrStr)
	CurrStr =Iif(ln_Pos> 0 ,Alltrim(Substr(CurrStr,ln_Pos+lenDel)),"")
	Return Alltrim(RetData)
Endproc


PROCEDURE OpenTable
Lparameters cTable,pNameAlias
Local cAliasName
cAliasName = IIF(PARAMETERS()= 2 ,pNameAlias,JustStem(cTable ))
If Used(cAliasName)
	RETURN  .t.
endif
Use ( cTable ) In  0  Again  Shared Alias (cAliasName)
Return USED(cAliasName)
EndProc

То AlexKasel , ну давай, попробуй 3 строчками. А я могу 2 ;)
...
Рейтинг: 0 / 0
21.10.2005, 14:42:21
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337680
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex11100
Гость
да, культуре поучиться необходимо

а программить - завязать
...
Рейтинг: 0 / 0
21.10.2005, 14:47:34
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337690
Кусакин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кусакин
Участник
Вот так замени:
Это специально для Re: MEMO в DBF
alex11100 казла, которому в лом посмотреть в НЕX редакоре как разделються строки в мемке

IF !OpenTable("temp.dbf","temp")
RETURN .f.
ENDIF
LOCAL oData
Select temp
SCATTER NAME oData MEMO
m.fmemo = oData.field_defa
lnCountLines = Memlines(m.fmemo)
lcStr1 = ""
For i = 1 To lnCountLines-1
lcStr1 = lcStr1+ParsStr(@m.fmemo, Chr(0x0A)+CHR(0x0D ))
Endfor
lcStr2 = ParsStr(@m.fmemo,Chr(0x0A)+CHR(0x0D))
lcStr2 = Strtran(lcStr2,"123asd","dsa321")
m.fmemo = lcStr1+lcStr2
? m.fmemo
Replace field_defa With m.fmemo
RELEASE oData
Return
...
Рейтинг: 0 / 0
21.10.2005, 14:49:45
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337702
Кусакин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кусакин
Участник
alex11100 - это ты про себя НУ ясное дело.
Иди в манагеры. Там таких 3.14здоболов любят. Сделаешь себе карьеру.
...
Рейтинг: 0 / 0
21.10.2005, 14:52:15
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337765
Недоходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Недоходящий
Участник
Все равно при повторном обращении к мемо , мемлайн видит только одну строчку, хотя через бровз видно что их 5. Че за хрень?
...
Рейтинг: 0 / 0
21.10.2005, 15:17:00
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337786
Кусакин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кусакин
Участник
А у меня выводит 5, после 20 обращения. В чем проблема ?
...
Рейтинг: 0 / 0
21.10.2005, 15:24:01
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337790
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex11100
Гость
lcStr=chr(13)+chr(10)
lnStr=2 && номер строки
lcNewString = "новая строка"
сAllMemo=таблица.поле

cAllNewMemo=iif(!empty(lnStr-1),subst(сAllMemo,1,at(cStr,сAllMemo,lnStr-1)-1),'')+lcStr+ lcNewString +subst(сAllMemo,at(lcStr,сAllMemo,lnStr))

replace таблица.поле with cAllNewMemo



учись - сынок
...
Рейтинг: 0 / 0
21.10.2005, 15:26:47
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337800
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex11100
Гость
Member Кусакин

иди в дворники
и не забивай людям голову

из-за тебя потерял кучу времени
...
Рейтинг: 0 / 0
21.10.2005, 15:29:51
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337815
Кусакин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кусакин
Участник
alex11100 ха-ха, ты такую куйню написал Время он потерял.
Крутыш )
...
Рейтинг: 0 / 0
21.10.2005, 15:39:17
| Ответить | Цитировать | Написать  
MEMO в DBF
    #33337820
Кусакин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кусакин
Участник
Мой алгоритм уникальный, а твой так, детский лепет начинающего программиста. Ламер :)
...
Рейтинг: 0 / 0
21.10.2005, 15:40:40
| Ответить | Цитировать | Написать  
25 сообщений из 107, страница 2 из 5
  2  все
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / MEMO в DBF
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&msg=33337549&tid=1593179]:
 0ms
get settings:
 6ms
get forum list:
 8ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 269ms
get topic data:
 6ms
get forum data:
 1ms
get page messages:
 36ms
get tp. blocked users:
 1ms
others: 216ms
total:  547ms
созд. / загр.: 547ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]