Небольшой подарок начинающим кодерам! , Нормальные функции работы с тесковыми полями

[Procenco]

Теперь работать с текстовыми полями станет по приятней тока не зыбывайте в обработчиках закрытия окна писать:

fldSetText(formid, filedid, NULL); что бы освободить память.

 
void fldSetText(UInt16 formid, UInt16 fieldid, char* str, Boolean redraw=true)
{
  FormType  *pFrm = FrmGetFormPtr(formid);
  UInt16     iFld = FrmGetObjectIndex(pFrm, fieldid);
  FieldType *pFld = (FieldType*)FrmGetObjectPtr(pFrm, iFld);
 
  MemHandle hMem = FldGetTextHandle(pFld);
  FldSetTextHandle(pFld, NULL);
  if(hMem!=NULL) MemHandleFree(hMem);
 
  if(str==NULL) return;
 
  hMem = MemHandleNew(StrLen(str)+1);
  MemPtr pMem = MemHandleLock(hMem);
  StrCopy((char*)pMem, str);
  MemHandleUnlock(hMem);
  FldSetTextHandle(pFld, hMem);
  
  if(redraw)
    FldDrawField(pFld);
}
 
char* fldGetText(UInt16 formid, UInt16 fieldid)
{
  FormType  *pFrm = FrmGetFormPtr(formid);
  UInt16     iFld = FrmGetObjectIndex(pFrm, fieldid);
  FieldType *pFld = (FieldType*)FrmGetObjectPtr(pFrm, iFld);
 
  return FldGetTextPtr(pFld);
}

кстати, это отлично работает со всеми полями и редактируемыми и не редактируемыми и однострочными и многострочными, причем reculculate делать не нужно так используется FldSetTextHandle.

formid и fieldid - это просто идентификаторы ресурсников (формы и поля)

Сообщение отредактировано: Procenco - 05.11.04, 09:01

[Procenco]

ну че ни каму не надо што ли?

[renton]

Кому надо - те, думаю, забрали :-)
Кстати - в большинстве случаев параметр формы - не имеет смысла, почти всегда юзается активная форма.

[Procenco]

Цитата renton @ 21.12.04, 12:58

Кому надо - те, думаю, забрали :-)
Кстати - в большинстве случаев параметр формы - не имеет смысла, почти всегда юзается активная форма.

вот именно что почти.....

[Strannic]

Procenco, сделай подарок начинающим кодерам использующим си переведя вот этот код с паскаля на си.
Думаю и тебе будет интересно на него взглянуть.

З.Ы.: прости я и сам бы это сделал, но беда со временем.
Прикреплённый файлPSLibrary.rar (19.97 Кбайт, скачиваний: 186)

[debugx]

вышеприведенный код отрабатывается как надо. Филды меняют свое содержимое. Но после того как метод fldSetText был вызван, начинаются рандомные крешы, к примеру на методе DmRemoveRecord(MyDB, CurrentRecord);
Если метод fldSetText не вызывать, то всё работает как надо.
Крешы начинаются если использовать этот метод хотя бы даже так:

Char* noteText = FldGetTextPtr(fld);
fldSetText(fld, noteText);

да, и передаю уже сразу FieldPtr и строку.
Подскажите в чем может быть проблема. Как правильно внести текст в редактируемый филд?
Спасибо.

Сообщение отредактировано: debugx - 11.01.08, 10:15

[debugx]

Вот так работает:
FldDelete(fld, 0, FldGetTextLength(fld));
FldInsert(fld, str, StrLen(str));