Patch level : 10.0 504
Files correlati : tc0.exe tc1.exe lv0.exe tutti i programmi che editano tabelle di modulo Ricompilazione Demo : [ ] Commento le chiavi ora possono arrivare a 255 caratteri git-svn-id: svn://10.65.10.50/trunk@19587 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
d0433bde47
commit
a8a516e528
@ -541,7 +541,7 @@ HIDDEN int __build_key(const RecDes& recd, int numkey, const RecType recin, cha
|
||||
off = rf.RecOff + kd.FromCh[i];
|
||||
len = kd.ToCh[i] - kd.FromCh[i] + 1;
|
||||
}
|
||||
if ((l + len) > 80)
|
||||
if ((l + len) > 255)
|
||||
{
|
||||
key[0] = '\0';
|
||||
return(_iskeylenerr);
|
||||
@ -896,7 +896,7 @@ int TBaseisamfile::skip(TRecnotype nrec, word lockop)
|
||||
while (_lasterr ==_islocked)
|
||||
{
|
||||
const RecDes& r = prefix().get_recdes(num());
|
||||
TString key(128);
|
||||
TString256 key;
|
||||
__build_key(r, _curr_key, curr().string(), key.get_buffer(), TRUE);
|
||||
message_box("Codice %s in uso da parte\ndi un altro utente.\nSkipping", (const char*)key);
|
||||
_lasterr = cisread(fhnd, getkey(), curr(),_iscurr + lockop, _recno);
|
||||
@ -3325,7 +3325,7 @@ TObject* TRectype::dup() const
|
||||
|
||||
const char* TRectype::build_key(int num) const
|
||||
{
|
||||
TString& tmp = get_tmp_string(128);
|
||||
TString& tmp = get_tmp_string(256);
|
||||
__build_key(rec_des(), num, string(), tmp.get_buffer(), TRUE);
|
||||
return tmp;
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user