delphi4arab منتديات دلفي للعرب

delphi4arab منتديات دلفي للعرب > منتديات دلفي الأخرى > برامج دلفي من عمل الأعضاء > من الارشيف ( Fiche de Pointage & Certificat de travail)
نسخة كاملة : من الارشيف ( Fiche de Pointage & Certificat de travail)
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .

onexite

13-03-2014, 04:36 PM
السلام عليكم
البرنامج برمجته منذ حوالي سنتين او اكثر ( كانت بدايتي البرمجية ) وقمت بالتعديل عليه قبل اشهر
واضن انه سينفع البعض منكم

الاجابيات
  • امكانية الاستراد والتصدير
  • الاضافة والحذف والتعديل والبحث والتصفية لا توجد بها اخطاء
  • متعدد المستخدمين وامكانية تحديد الصلاحيات
  • امكانية تغيير اسم ومكان الشركة
  • لا يحتاج تنصيب ( شيء جديد / طبخة سرية )
  • الطباعة بالجملة
  • الاحصائيات
  • الحماية / تاريخ اخر استخدام

السلبيات
  • جعلته محدود 34 عامل فقط
  • الاخطاء الاملائية ...

صور من البرنامج
[صورة: rnni.jpg]

[صورة: l2v5.jpg]

تنزيل البرنامج
كود :
http://www.mediafire.com/download/25sf9fzhik34fn0/Idmaj.7z

هل من اقتراحات او انتقادات ؟

bassem_43

12-07-2014, 03:37 PM
السلام عليكم
بعد تجريب برنامجك لدي ملاحظات سريعه ان سمحت :
- اولا البرنامج جميل ويحتوي على خصائص متعددة .
- عند اختيار الاشهر تظهر كلها 31 يوم في fiche de pointage حتى ولو اخترنا شهر فيفري
- حاول اظافة امكانية اظهار الايام التي لم يعمل بها الشخص كالعطل و الاعياد في fiche .
- ما هي كلمة مرور المدير ؟؟
وبارك الله فيك

onexite

25-08-2014, 05:57 PM
bassem_43 كتب :السلام عليكم
بعد تجريب برنامجك لدي ملاحظات سريعه ان سمحت :
- اولا البرنامج جميل ويحتوي على خصائص متعددة .
- عند اختيار الاشهر تظهر كلها 31 يوم في fiche de pointage حتى ولو اخترنا شهر فيفري
- حاول اظافة امكانية اظهار الايام التي لم يعمل بها الشخص كالعطل و الاعياد في fiche .
- ما هي كلمة مرور المدير ؟؟
وبارك الله فيك
تم ارفاق صورة

onexite

29-08-2014, 04:25 PM
إقتباس :- عند اختيار الاشهر تظهر كلها 31 يوم في fiche de pointage حتى ولو اخترنا شهر فيفري
- حاول اظافة امكانية اظهار الايام التي لم يعمل بها الشخص كالعطل و الاعياد في fiche .
كل هذا يوجد

ALG2009

29-08-2014, 05:59 PM
لو تتقضل أنت أو أحد الأشخاص بشرح برمجه البرنامج خطوه خطوه حتى نتعلم منكم

onexite

04-09-2014, 01:26 AM
سيكون متاحا للتحميل في الاشهر المقبلة ( النسخة التي تعمل على lan ) مع قاعدة بيانات مشتركة
PHP كود :
function GetNetworkByWorkgroup(Workgroup: String): TStrings;
var
EnumHandle: THandle;
WorkgroupRS: TNetResource;
Buffer: array[1..500] of TNetResource;
BufSize: Cardinal;
Entries: Cardinal;
Res: Integer;
begin
Result := TStringList.Create;
FillChar(WorkgroupRS, SizeOf(WorkgroupRS), 0);
with WorkgroupRS do begin
dwScope := RESOURCE_GLOBALNET;
dwType := RESOURCE_REMEMBERED;
dwDisplayType := RESOURCEDISPLAYTYPE_DOMAIN;
dwUsage := RESOURCEUSAGE_CONTAINER;
lpRemoteName := @Workgroup[1];
end;

WNetOpenEnum(RESOURCE_GLOBALNET, RESOURCETYPE_ANY, 0, @WorkgroupRS, EnumHandle);
repeat
Entries := 1;
BufSize := SizeOf(Buffer);
Res := WNetEnumResource(EnumHandle, Entries, @Buffer, BufSize);
if (Res = NO_ERROR) and (Entries = 1) then
Result.Add( StrPas(Buffer[1].lpRemoteName) );
until (Entries <> 1) or (Res <> NO_ERROR);
WNetCloseEnum( EnumHandle );
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
 ComboBox1.Items := GetNetworkByWorkgroup('Workgroup');
end; 

mohamine87

11-02-2015, 04:50 PM
ممكن طريقة عمل الفيش بونتاج وعمل الفلترة بالاشهر لقيت صعوبة في الكود
ممكن تفيدنا اخي ولك جزيل الشكر

ahmedhamza1111

16-06-2015, 04:24 PM
بارك الله فيكم
delphi4arab منتديات دلفي للعرب > منتديات دلفي الأخرى > برامج دلفي من عمل الأعضاء > من الارشيف ( Fiche de Pointage & Certificat de travail)