ذخیره سازی داده ها

[mostafa_zamani]

با سلام
من برای ذخیره داده های یک فرمی که از چند جدول استفاده می کنه از دستورات ذیل استفاده می کنم :
لطفا در این زمینه بنده را از راهنمایی های خو بهره مند سازید .

جدولها در حالت بافرینگ است :




BEGIN TRANSACTION
Lerror=.f.
SELECT dbf1
IF !TABLEUPDATE(.t.)
Lerror = .T.
ENDIF
SELECT dbf2
IF !TABLEUPDATE(.t.)
Lerror = .T.
ENDIF


IF Lerror
ROLLBACK
SELECT dbf1
=TABLEREVERT(.T.)
SELECT dbf2
=TABLEREVERT(.T.)
ELSE
END TRANSACTION
ENDIF


RETURN !Lerror

[gh_khajehzade]

بدون نظر در مورد کد شما, چرا از form wizard خود فاکس استفاده نمیکنی ؟به نظر من راحتتر ه.

[mostafa_zamani]

سلام و تشکر از راهنمایی شما
ویزارد فاکس دکمه هایش و ....انگلیسی است .... و نیاز به یکسری اصلاخات دارد ....
فکر کنم باید داخل خود کلاسهای مربوطه را اصلاح کنیم ؟ درسته ؟
شما در این زمینه کاری انجام داده اید ؟
می تونید در اختیار بنده قرار دهید ؟
با تشکر

[gh_khajehzade]

سلام
1-بعد از ساختن فرمت با wizard, یک کپی از کلاس wizbtns.vcx که تو پوشه نصب فاکس هست به پوشه برنامت کپی کن.این کلاس مربوط به دکمه های پایین فرم هست.
2-تمامی فایلهای تصویر که مربوط به آیکنهای رو ی کلیدها است رو به یک پوشه فرعی در پوشه اصلی برنامت کپی کن. 3-در propertise فرم مسیر wizbtns.vcx رو مسیر برنامت بذار(پیش فرض پوشه نصب فاکس هست)
4-حالا میتونی کلاس wizbtns.vcx رو تغییر بدی با فرمان



MODIFY CLASS ? OF c:\colder\wizbtns.vcx

wizbtns.picbtns.setcaption

مسیر فایلهای تصویر رو مسیر برنامت قرار بده و caption ها رو هم فارسی کن.