Delphi Forum

şuan o tarihinde yazdığım koda bakıyorumda, bir sürü mantık hatası, bir sürü gereksiz kod ve çok acemice kodlamışım :)

kusura bakma @umutcanster, bu kod üzerinden daha fazla devam etmicem. google code search'da benden kat be kat daha iyi coderlerin kodlarını inceleyebilirsin.

http://www.google ...

Evet üstatlar zaten sorunun neden kaynaklandığını belirtmiş, ben çok fırsatçıyım sanırım :) Birde dll kullanılırken dikkat edilmesi gereken nokta veri tipleridir. string yerine pchar veya widestring kullanılabilir, çünkü dönüşümlerde memoryden alınan yerler, dll free edildikten sonra ana programdan ...

function Icon2BMP(const FileName: TFileName): TBitmap; export;
var
Icon: TIcon;
Bitmap: TBitmap;
begin
Icon := TIcon.Create;
Bitmap := TBitmap.Create;
Icon.LoadFromFile(FileName);
Bitmap.Width := Icon.Width;
Bitmap.Height := Icon.Height;
Bitmap.Canvas.Draw(0, 0, Icon);
// Bitmap.Assign ...

Şu an piyasada en popüler OCR yazılımı " ABBYY FineReader " Scannerdan tarattığınız bir evrak dosyasını veya bilgisayarınızda bulunan bir resmi programa attığınızda, size direk word, excel, pdf, txt vs... formatlarda elektronik çıktı verebiliyor. Bu çıktıların metinlerini uyumlu bir takip programı ...

OCR için bir dll geliştirin yazılım geliştiriciler bu dll yi kullanarak piyasaki benzerlerinden, daha iyi kullanıcı arabirimli yazılımlar geliştirebilir.

Base form kullansaydın keşke. mesela bir anaform tasarla, diğer formlarıda bu form üzerinden oluştur.

ana form

unit base;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;

type
TBaseFrm = class(TForm)
procedure FormCreate(Sender: TObject ...

bi çözümde benden;



procedure LoadDelimiterTextsA(FileNameA: string);
var
Sl, Dl: TStringList;
I, J: Integer;
begin
if FileExists(FileNameA) then
begin
Sl := TStringList.Create;
Dl := TStringList.Create;
try
Sl.LoadFromFile(FileNameA);
Dl.StrictDelimiter := True;
Dl.Delimiter ...

geniş bilgi http://www.delphibasics.co.uk/RTL.asp?Name=Format

umarım spam vs. gibi işler için istemiyorsundur. eğer öyleyse gerçekten üzülürüm!

mesela bir html source kodu

<link rel="icon" href="http://i.imdb.com/favicon.ico" />

yukarıdaki linki almak için href=" <> " arasındaki değeri alan bir fonksiyon yazman lazım.

bunun için basit bir örnek yazdım ...

FsScript Fast Report altında çalışan bir pascal script componenti. Fast Report ücretli bir bileşen, satın aldığında bu uyarı çıkmaz(büyük bir ihtimal)

Daha kapsamlı bir pascal scripti arıyorsan RemObjects Pascal Script önerebilirim. Ücretsiz ve açık kaynak kodlu.

http://www.remobjects.com/ps ...

Application.Initialize;
....
....
Application.Run;

keşke dpr dosyanızda ... ile işaret ettiğim kod bloğunda create ettiğiniz formlarıda yazsaydınız. Ana form ve ana formdan erişilen diğer formların onclose, ondestroy eventlerinde kontrol edilebilir veya ana formdan bu formlara erişirken form ...

Bende onlarca kez bu paketi kurdum, niye bana hiç bu hatalar denk gelmiyor anlamıyorum. Sürüm farklılığı ile ilgili bir problem olabilir. Biraz daha açıklayıcı bilgi verirseniz belki yardımcı olabilirim.

Paket halindemi kuruyorsunuz?( evet ise hangi paketler, nereden indirdiniz)
Hangi sıraya göre ...

Bu program çeşitli string işlemlerinde kullanılmak üzere tarafımdan geliştirilmiştir. Yazılımın en büyük özelliği yazdığınız script kodlarını dinamik olarak derleyip sonucu size sunmasıdır. Bu işlem için http://www.remobjects.com/ adresinde bulunan Pascal Script bileşeni kullanılmıştır. Bunun ...

Aklıma gelen birkaç olasılık var.

Datamodule ve IBEvent kullanıyorsanız ana form kapanırken ibevent thread suspended mesajı göndermelisiniz.


// TDM = class(TDataModule)

procedure TDM.DataModuleDestroy(Sender: TObject);
begin
IBEvent1.UnRegisterEvents;
end;



Yani buradaki mantık, ana form ...

Mesela örnek verir misin, hangi site üzerinde bunu deniyorsun. Hangi kodlarla bunu yapmaya çalışıyorsun, biraz daha bilgi verebilirsen çözüm sunabilirim.