Tüm Platformlar için Hızlı Uygulama Geliştirme --->    Kitabımız...      Delphi

Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 5/5 - 1 oy
  • 1
  • 2
  • 3
  • 4
  • 5
C Nesnelerini Delphi'de kullanmak
#1
Merhaba, soru şu; "C'de  hazırlanmış bir object dosyasından fonksiyon ve prosedürleri Delphi'de nasıl kullanabiliriz?"

Aynı soruyu şu şekilde de sormak mümkün; "C'deki bir rutini Delphi'den nasıl çağırırız?"

Örnekleyerek kısaca anlatan herkese 10'ar puan ve ufak bir sürpriz Smile
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol,Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol,Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol,Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Cevapla
#2
C# ve DLL'den bahsetmiyorum Wink
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol,Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol,Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol,Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Cevapla
#3
Acilen uyumam gerek. Özür dilerim hocam Smile
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Cevapla
#4
Bilen yok galibaSmile
Cevapla
#5
Aşağıdaki sayfada ayrıntılı olarak anlatılmıştır.Eğer işinize yarayacaksa Türkçe'ye çevirebilirim.

Using C object files in Delphi:
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
WWW
Cevapla
#6
(09-01-2018, Saat: 20:38)csunguray Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlAşağıdaki sayfada ayrıntılı olarak anlatılmıştır.Eğer işinize yarayacaksa Türkçe'ye çevirebilirim.

Using C object files in Delphi:
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol

Maalesef geç kaldınız üstadım Smile
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol,Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol,Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol,Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Cevapla
#7
Çözüm ve sürpriz aşağıdaki linkte ye alıyor;

Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol

Buradan tekrar Linkleri Görebilmeniz İçin Giriş yap veya Üye Ole teşekkürlerimi sunuyorum.
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol,Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol,Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol,Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Cevapla
#8
(10-01-2018, Saat: 00:39)uparlayan Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlÇözüm ve sürpriz aşağıdaki linkte ye alıyor;

Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol

Buradan tekrar Linkleri Görebilmeniz İçin Giriş yap veya Üye Ole teşekkürlerimi sunuyorum.

Rica ederim,emekleriniz için ben teşekkür ederim.
Bizi Toprağa Gömdüler Fakat Tohum Olduğumuzu Bilmiyorlardı.
Cevapla
#9
(09-01-2018, Saat: 20:38)csunguray Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlAşağıdaki sayfada ayrıntılı olarak anlatılmıştır.Eğer işinize yarayacaksa Türkçe'ye çevirebilirim.

Using C object files in Delphi:
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol

Kesinlikle katılıyorum.
Mal sahibi, mülk sahibi
Hani bunun ilk sahibi ?
Mal da yalan mülk de yalan
Var biraz da sen oyalan...
WWW
Cevapla
#10
Uyku tutmadı, ben bir örnek paylaşayım bariSmile

cprintf.c dosyası
#pragma once
#include<stdio.h>
#include<stdlib.h>
void __stdcall cprintf(char* format,char** argv,int argc)
{

int i=0;
int iesp;
__asm{
mov iesp,esp
}
for(i=argc-1;i>=0;i--)
{
char *item=argv[i];

__asm
{

push item
}
}
__asm
{
push format
call printf
mov esp,iesp
}


}

void __stdcall csystem(char * cmd){

system(cmd);


}

bcc32 -c cprintf.c komut satırıyla derliyoruz.

dprintf.dpr dosyası

program dprintf;

{$APPTYPE CONSOLE}

{$R *.res}
    {$L cprintf.obj}// derledğimiz object dosyasını linkere bildiriyoruz.
uses
 System.SysUtils;
Type
PPChar=^PAnsiChar;

procedure cprintf(format: PAnsiChar;argv: PPChar=nil;argc: integer=0);stdcall;external;
procedure csystem(cmd: PAnsiChar);stdcall;external;
function _printf(const Format: PChar): Integer; cdecl; varargs; external 'msvcrt.DLL' name 'printf' ;
function _system(const cmd: PChar): Integer; cdecl; external 'msvcrt.DLL' name 'system' ;

var
idizi: array [0..4] of integer=(1,2,5,9,13);
cdizi: array [0..2] of PAnsiChar=('Merhaba','Delphican','Forumu');

begin
cprintf('Merhaba C'#10);
cprintf('%d,%d,%d,%d,%d'#10,PPChar(@idizi[0]),5);
cprintf('%s %s %s'#10,@cdizi[0],3);
csystem('pause');
end.

Daha geniş açıklama zaten makalede var.
Bizi Toprağa Gömdüler Fakat Tohum Olduğumuzu Bilmiyorlardı.
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Delphi ORM Yapısı ile işlevsel kod çıktısı oluşturma Abdullah ILGAZ 7 331 19-09-2017, Saat: 23:04
Son Yorum: uparlayan



Konuyu Okuyanlar: 1 Ziyaretçi