Bilgisayarınıza bulaşan tabir edilen ve bilgisayarınızı tabiri caizse bir “mal”a çeviren zararlılar, IE (Internet Explorer)’ın giriş sayfasına kendi adresini yazar ve burayı kilitler. Böylece tarayıcıyı her açtığınızda sörfe malware’in sitesi ile başlarsınız. IE’ın giriş sayfası kilidini kaldırmak için aşağıdaki aracı kullanabilirsiniz. Ayrıca kaynak kodlarını da indirebilirsiniz.

tr v9 kaldırma (209), giri (86), v9 anasayfa kaldırma (58), v9 silme (54), v9 ana sayfadan kaldırma (49), v9 anasayfa kaldırma aracı (43), v9 u ana sayfadan kaldırma (41), explorer kilit açma kodu (39), v9 ana sayfa kaldırma aracı (37), internet explorer kilidini açma (30), explorer kilit açma programı indir (28), giriş sayfası kilidini açma (27), v9 giriş sayfası (27), internet giri (25), anasayfa kilidini açma (23)

“Canvas does not allow drawing” hatası tuval çizime izin vermiyor gibi bir anlam taşıyor. Tuval ressamların resimlerini çizdikleri yüzeye verilen ad burada ise programdaki bileşenlerin görsel kısımlarına (arabirim) karşılık geliyor.

Canvas hatası iki nedenden kaynaklanabilir. Ya çizim yapacak kaynağınız kalmamıştır ya da multithread bir programda tuvali boyamaya çalışan iki fırça birbiriyle çakışıyordur. Dediğimiz gibi bu Canvas hatası ençok multithread programlarda karşımıza çıkıyor. VCL bileşenleri thread-safe değillerdir. Bu yüzden bileşenlerin görsel özellikleriyle işlem yaparken Synchronize fonksiyonunu kullanmalısınız. Synchronize’a parametre olarak verdiğiniz alt program thread-safe olarak çalıştırılır. Yani canvas sorunu çıkartacak görsel işlemleri güvenli bir zamanda icra ettirmiş olursunuz. Aşağıdaki thread örneğini inceleyebilirsiniz.

canvas does not allow drawing (60), delphi multithread (6), delphi canvas does not allow drawing (6), graphics interface thread (6), delphi canvas (5), canvas does not allow drawing ne demek (3), graphics interface thread hatası (3), delphide tuval (2), canvas does not allow drawing delphi (2), graphics interface thread nedir (2), graphics interface thread ne demek (2), graphics interface thread çözümü (1), graphics interface thread hatas (1), medisoftta canvas does not allow drawing hatası nedir (1), multithread nedir (1)

Başlık ilk okunduğunda anlaşılabilecek türden olmadı biliyorum. Metin kutusunun içeriği değiştiğinde içeriğine müdahale etmek pek mümkün değildir (Yani OnChange yordamında  içeriği değiştirecek işlemler yapmak). OnChange olayında içeriği değiştirirseniz, oluşan değişiklikten dolayı OnChange tekrar çalıştırılır ve bu böyle sonsuza kadar devam eder. Aslında yığın (stack) dolana kadar devam eder. Yığın neden dolar derseniz, bir nevi recursive (özyineli) bir süreç başlatırsınız, yani her alt süreçten geri dönebilmek için, sürecin geri dönüş noktası (yordamın enson çağırıldığı konuma karşılık gelen bellek adresi) yığına kaydedilir ve LIFO (Last in First out) düzeniyle geri boşaltılır.

Bu tarz birşeye ihtiyaç duyduğumuzda OnChange olayı boşaltılırsa yukarıdaki gibi bir zincirleme reaksiyon başlamayacaktır. İşimiz bittiğinde de OnChange olayını eski haline geri çevirmeyi unutmamalıyız. Olayın içini boşaltmak için nil değerini kullanıyoruz. Aşağıda bir örnek yer alıyor.

procedure TForm1.Edit1Change(sender:Tobject);
begin
	// OnChange olayinin ici bosaltiliyor
	Edit1.OnChange := NIL;

	// Edit1'in icerigini degistiren kodlar burada

	// OnChange olayi yeniden yukleniyor
	Edit1.OnChange := Edit1Change;
end;

onchange (10), onchange nedir (8), delphi edit boşaltma (2), delphi edit türkçe (2), 2 onchange (1), delphide editlerin içini boşaltma (1), edit1 onchange (1), editin onchange olayını iptal etmek (1), onchange ile (1), onchange nedir delphi (1), select onchange nedir (1), delphi tedit olayları (1), delphi onchange nedir (1), android edit text onchange (1), change nedir delphide (1)

Delphi’nin bir scrollbar’a (kaydırma çubuğu) sahip TMemo, TListBox, TStringGrid ve TListView gibi birçok nesnesi bulunmakta. Nesnenin içindeki elemanlar nesnenin yüksekliğine sığmadığında otomatik olarak dikey bir  scroollbar oluşturulur. Bu bar ile liste içerisinde hareket edebilirsiniz. Bazen listede istediğiniz bir elemanı göstermek için kaydırma çubuğunu kontrol etmeniz gerekebilir. Aşağıdaki örneklerdeki gibi SendMessage ile nesneye mesaj göndererek listenin istediğiniz konuma kaymasını sağlayabilirsiniz.

delphi scrollbar (10), delphi sendmessage (5), ScrollBar delphi (4), kontrol etme kodu (3), <i> kod </i> (2), ı kod (2), mesaj kontrol etme kodu (2), delphi scrollbar kodları (2), delphi de formu kaydırma kodları (2), delphide kaydırma çubuğu (1), delphi volume control (1), delphi stringgrid hücreyi bulma (1), delphide kaydırma çubuğunu (1), delphide query durumunu kontrol etmek (1), delphide scroll (1)

Windows 7 üzerine Delphi 7 kurduysanız F1 tuşu ile çağrılan yardım dosyasının görüntülenmediğini farkedeceksiniz. Sorun windows 7 ile beraber gelen yardım görüntüleyici programının artık eski yardım dosyası formatlarını (.hlp) desteklemiyor olması. Windows 3.1 den XP ye kadar kullanılan winhlp32.exe adındaki görüntüleyici ihtiyaçları karşılmadığı için Windows 7′ye dahil edilmemiş. Ancak microsoft’un indirilebiliyor. Sorunu çözmek için aşağıdaki dosyayı indirerek kurabilirsiniz. İndireceğiniz .cab paketi içindeki install.cmd betiği, winhlp32.exe‘yi sisteminize kuracaktır. Dilerseniz winhlp32 programını ‘dan da temin edebilirsiniz. (WGA gerektiriyor)

delphi 7 windows 7 uyumu (201), delphi 7 indir gezginler (175), delphi 7 windows 7 (128), delphi windows 7 (57), delphi 7 windows 7 indir (27), windows 7 delphi 7 (23), delphi 7 indir (22), delphi indir gezginler (21), windows 7 delphi 7 sorunu (19), delphi indir (18), windows 7 indir gezginler (14), delphi 7 gezginler (13), winhlp32 exe gezginler xp uyumlu (12), delphi win7 (10), delphi 7 acılmıyor (10)

TStringGrid nesnesi varsayılan olarak seçili hücrelerini mavi renkle ışıklandırıyor bunu istemiyorsanız aşağıdaki kodu kullanabilirsiniz.

procedure TForm1.FormCreate(Sender: TObject);
var
    grRect: TGridRect;
begin
    grRect.Left := -1;
    grRect.Top := -1;
    grRect.Right := -1;
    grRect.Bottom := -1;
    StringGrid1.Selection := grRect;
end;

delphi stringgrid (6), stringgrid özellikleri (5), stringgrid delphi (5), stringgrid seçili satırı silme (3), stringgrid nesnesi (2), win32/induc a zararlısını (2), delphi stringgrid hücre renklendirme (2), delphi 7 stringgrid (2), stringgrid renklendirme (1), stringgrid satır silme (1), stringgrid örnekleri delph (1), stringgrid örneği (1), stringgrid nasıl delphi (1), stringgrid kullanarak (1), stringgrid hücreyi boyama (1)

Delphi‘de dizin oluşturmak için kullanılan komut ‘dir. CreateDir belirttiğiniz bir dizinde yeni bir dizin oluşturmak için kullanılır. Eğer amacınız iç içe birden fazla dizin oluşturmak ise (patika oluşturmak) bunu CreateDir’i birden fazla kullanarak yapabilirsiniz ama size tavsiyem bunun yerine komutunu kullanmanız. Örneğin; D:\ sürücüsünde “Dökümanlar\Dersler\Matematik” gibi iç içe bir dizin yapısı oluşturmak istiyorsanız ForceDirectories komutunu aşağıdaki gibi kullanarak bu işi kolayca gerçekleştirebilirsiniz.

ForceDirectories('D:\Dökümanlar\Dersler\Matematik'); 

ağaç dizin (2), ağaç dizini (1), delphi ağaç (1), delphi dizin oluşturma (1), delphi klasör oluşturma (1), dizin ağacı oluşturma (1), dizin ağacı oluşturma programı (1)

Herhangi bir prosesin (işlem) bünyesinde bulunan thread (kanal) sayısını almak için aşağıdaki alt programı kullanabilirsiniz. GetCurrentProcessId çalışmakta olan programın prosess kimlik numarasını getirir. TlHelp32 ünitesini dahil etmeyi unutmayın.

implementation
uses TlHelp32;

function ThreadCount(iProcessID: DWord): integer;
var
  SnapHandle: THandle;
  ProcEntry: TProcessEntry32;
begin
  Result := 0;
  SnapHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
  if SnapHandle = 0 then Exit;
  FillChar(ProcEntry, SizeOf(TProcessEntry32), 0);
  ProcEntry.dwSize := SizeOf(TProcessEntry32);
  if Process32First(SnapHandle, ProcEntry) then
  begin
    if ProcEntry.th32ProcessID = iProcessID then
    begin
      Result := ProcEntry.cntThreads;
      Exit;
    end;
    while Process32Next(SnapHandle, ProcEntry) = true do
    begin
      if ProcEntry.th32ProcessID = iProcessID then
      begin
        Result := ProcEntry.cntThreads;
        Break;
      end;
    end;
  end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  Caption := inttostr( ThreadCount( GetCurrentProcessId ));
end;

createtoolhelp32snapshot thread count (1), delphi get thread count current process (1), delphi Thread Count process (1), thread count (1)

Daha önce burada ‘ye bulaşan Induc isimli virüsten bahsetmiştik. Virüs, eğer Delphi IDE‘si yüklü ise kendini delphi’nin lib dizinindeki sysconst.dcu dosyasına ekliyor. Bu dosya tüm delphi projelerine otomatik olarak dahil edildiği için geliştirdiğiniz tüm uygulamaların exe dosyaların enfekte olmuş oluyor.

Delphi IDE’sine bulaşan bu zararlıdan kurtulmak için aşağıdaki adımları uygulayabilirsiniz:

1) C:\Program Files (x86)\Borland\Delphi7\Source\Rtl\Sys\SysConst.pas dosyasını C:\Program Files (x86)\Borland\Delphi7\Lib dizine kopyalayın.

2) C:\Program Files (x86)\Borland\Delphi7\Lib\SysConst.dcu dosyasını silin.

3) Win32Induc bulaşan uygulamanızın exe’sini silin ve yeniden derleyin.

Dikkat: bu işlemlerden sonra yeni derlenen uygulamalarda Induc yer almayacak fakat Induc’ın bulaştığı bir uygulamayı çalıştırdığınızda Delphi IDE’niz yeniden enfekte olacak. Bu yüzden Delphi çalışmalarınızı bir antivirüs yazılımı ile taratarak temizletmeniz gerekiyor.

Basit bir önlem alalım

Ne olur ne olmaz diyerek SysConst.dcu dosyanızı değişikliklere karşı korumaya almak isteyebilirsiniz, bunun için aşağıdaki adımları uygulayın.

1) C:\Program Files (x86)\Borland\Delphi7\Lib\SysConst.dcu sağ tıklayıp özellikler seçeneğine tıklayın.

2) Özellikler penceresinden salt okunur (readonly) öznetiliğini işaretleyin ve uygulayın.

Bir önlem daha alalım (gözümüz çıkmaz umarım)

Dosyayı Saltokunur yaptık ama virüs yine de bu izni kaldırıp üzerine  yazabilir diyorsanız çok sağlıklı düşünüyorsunuz demektir.  Windows kullanıcı hesabınızın bu dosya üzerindeki öznitelikleri değiştirme yetkisini de kaldırabilirsiniz. Bunun için aşağıdaki adımları uygulayın.

1) C:\Program Files (x86)\Borland\Delphi7\Lib\SysConst.dcu sağ tıklayıp özellikler seçeneğine tıklayın.

2) Güvenlik sekmesine gelin, Administrators (hesabınızın üye olduğu gurup)’ı seçip Gelişmiş düğmesine tıklayın.

3) Açılan Gelişmiş Güvenlik Ayarları penceresinden, Administrators‘i seçip İzinleri Değiştir düğmesine tıklayın.

4) Açılan yeni pencereden, Administrators‘i seçip Düzenle düğmesine tıklayın.

5) Açılan İzin Girdisi penceresindeki izinler listesinden, Öznitelikleri yaz isimli izine ait İzin Verme onay kutusunu işaretleyin.

6) Açık olan tüm pencerelerin Tamam düğmelerine tıklayarak kapatın.

Bu son adımda yaptığımız ayarlara ait ekran görüntüsü aşağıdaki gibi bir şey:

v9 kaldırma (2200), v9 nasıl kaldırılır (720), v9 nasıl silinir (440), v9 web siteleri portalı kaldırma (334), v9 web siteleri portal? kald?rma (124), v9 kaldır (103), v9 nasıl iptal edilir (83), v9 web siteleri portalı indir (76), v9 web siteleri portalı nasıl kaldırılır (50), v9 web siteleri portal? (40), v9web siteleri portalı (36), v9 portal silme (31), v9 kaldırmak (30), v9 web siteleri portalı nasıl silinir (28), v9 nasıl kaldırabilirim (25)

Daha önce PHP’de yazdığım yarım kalmış bir e-okul projesinden bahsetmiş ve kodlarını paylaşmıştım. Paylaşımın delphi ayağına ait programı henuz bulabildim. Onuda buradan paylaşacağım. Program kısca; Bilsa Karma programının mdb biçimindeki veritabanlarından not ve devamsızlık bilgilerini alarak script’in kullanabileceği MySQL veribanına aktarıyor. Program temel görevleri yerine getiriyor fakat üzerinden bir hayli zaman geçtiği için eksiklikleri/hataları nelerdi konusunu hatırlayamıyorum.

Programı derleyip çalıştırmayı deneyecekler için;

1. Ana form üzerinde Ayarlar düğmesinden script’in bulunduğu URL’yi yazın
2. Kullanıcı adı olarak script’in config.php dosyasındaki DBUpdateUsername ve DBUpdatePassword değerlerini kullanın.
3. Data dizinine okul veritabanlarının saklandığı “1″,”2″.. ismindeki klasörler ile OGRSIFRE.MDB ve STARTUP.MDB isimli veritabanlarını kopyalayın veya Gözat düğmesi ile Karma’nın yüklü olduğu ana dizini gösterin.

e okul (133), e okul script (116), E OKUL7 (80), e okul script indir (69), e-okul scripti (65), okul scripti (57), EOKUL (55), e-okul script (51), eokul script (48), script e okul (47), E okul Scripti (45), e okkul (40), e okul icin script indir (27), okul script (20), EOKUL EOKUL (19)

Delphi’nin Syscons.dcu veya sysconst.pas dosyasına bulaşan bir virüs peydah oldu.

Kaspersky’da adlandırması Win32.Induc.a olarak geçiyor, kendisini sysconst.pas’a include etmek sureti ile bulaşıyor.

Böylelikle her derlemede exe içerisinde virüscük de yaşamaya devam ediyor.

Bu durumda önce virüs temizliği sonra mutlaka delphi’ı kaldırıp tekrar kurmak lazım (ben öyle yaptım).

Evet ne yazıkki sisteminizde hiç virüs olmasa da kullandığınız ücretsiz full open source komponentler de ne yazıkki virüse neden olabiliyor.

Her yüklediğimiz yeni komponeneti bir de kod kontrolünden geçirmek lazım sanırım.

Virüslü olup olmadığınız anlamak için sysconst.pas içinde aşağıdaki kodlar var mı yok mu bakmak gerekiyor. Tabi bu sadece bu türün bir türevi ise dışarıdan aldığımız her komponenti incelemek de şart.

Delphi 4-7 geliştirme ortamına bulaşan virüs varyantının kodları aşağıdaki gibi.

şafak yüksektepe (5), delphi assignfile ne işe yarar (3), win32 induc a virüs türevi (2), delphi de derlediğim programı virus (2), delphi şafak yüksektepe (2), Borland Delphi 8 gezginler (1), virüs:win/ınduc a (1), virus win32 induc a virus bilgisayardan kaldırma (1), induc a virus türevi nedir (1), delphi virüs yazarları (1), delphi assignfile rewrite closefile (1), delphi assignfile (1), win32/ınduc A virüs türevi (1)

TIdHttp içinde aniden peydahlanan bu sorun kodun ele aldığı tarih bilgisinin, daha doğrusu tarih formatının önceden varsayıldığı gibi olmamasından kaynaklanıyor. Aslında bu sorunun çözümü için ‘da birkaç farklı yol bulunsa da kod yamalamayı gerektirdiği için bunları tavsiye edemiyorum.

Belirsiz bir nedenden dolayı süpriz olarak ortaya çıkan bu sorunu kütüphaneleri yamalayarak çözmek pek mantıklı değil. Delphi’nin kütüphaneleri eğer güncel bir versiyonunu kullanıyorsanız muhtemelen böcek/kod satırı oranı iyi bir düzeydedir ve sizin yapacağınız müdahalelerin bu oranı artırma potansiyeli yüksek.

Çözüm olarak bilgisayarınızı yeniden başlatıp hatayı tekrar kontrol edin. Sorun muhtemelen yüklediğiniz bir programın windows’un kararlılığını bozduğu geçici bir durumdur.

Başka bir çözüm de Windows’un denetim masasındaki Bölge ve Dil Seçenekleri simgesinden geçerli tarih formatı ayarlarınızın normal olup olmadığına bakın.

Related Blogs

invalid argument to date encode (51), invalid argument to date encode delphi (5), delphi invalid argument (5), delphide kod hatalarını gidermek (3), backtrack invalid argument sorunu (2), invalida argument to date encode (2), invalid argument to date encode hatasını gidermek (1), invalid argument to date encode ne demekj (1), invalid argument to date encode ne demektir (1), invalid argument to date encode TÜRKÇESİ NEDİR (1), ınvalid indir gezginler (1), backtrack invalid argument hatası (1), ınvalid argument to date encode arızası (1), invalid argument to date e (1), invalid argument date encode delphi 7 (1)

About.com birçok konuda olduğu gibi Delphi‘de yazılım geliştirme konularıyla ilgili yazılar yayınlıyor. Makaleler ve çeşitli kod örneklerinden oluşan yazılar ele aldığı konuların kullanışlılığı ve anlatımındaki yalınlık ile akılda kalıyor. Aşağıda, benim de zamanında çok aradığım ve bazılarının işine yarayabilecek, web sitelerinin ekran görüntüsünü çekmek için bir kod yer alıyor. Kod TWebBrowser nesnesi ile taranan sayfaların ekran görüntüsünü kaydetmek için kullanılıyor.

Access violation hatası belleğin işlem yapılan konumunun okunamamasından veya yazılamamasından kaynaklanır. Hata mesajında hataya neden olan kodun segment ve ofset adresleri bildirildiğinden programcının hatanın yerini tespit etmesi zordur. Benzer sorunlar sıfıra bölme (zero division) ve yığın taşması (stack overflow) gerçekleştiğinde de olur.

Delphi programlarında bu tür sorunlara neden olan kod satırlarını tespit münkündür. Bunun için Project->Options…->Linker ekranındaki Map file ayarı Detailed olarak ayarlanır. Bundan sonra her derleme işleminde uzantısı map olan bir bellek harita dosyası oluşturur.

Bu dosyada program  kod satırlarınıa karşılık gelen makina kodlarının ofset adresleri yer alır. Böylece hatanın oluştuğu bellek adresinin hangi kod satırına karşılık geldiği bulunabilir.

Hatalı kod satırını daha düzgün ve ayrıntılı olarak raporlayabilmek için class’ını kullanabiliriz. uLkStackTrace Mozilla lisansıyla dağıtılan bir SourceForge.net projesi.

uLkStackTrace sınıfınınkullanıldığı örnek proje dosyasını aşağıdaki bağlantı ile indirebilirsiniz:

UnhandledExceptions_DelphiSourceCode.rar (~241KB)<

Örnek projede de görüleceği üzere, sınıfın kullanılmasından kısaca bahsetmek  gerekirse;

• Uses bloğuna uLkStackTrace unit ismini ekleyin.
• İstisnaları ekrana veya bir dosyaya rapor edecek bir prosedür hazırlayın.
• LkExceptionReporter yordamına bu prosedürü atayın.
• Rapor prosedürünü Form.Create‘in başına yazmayı unutmayın.

delphi access violation (5), delphi ile access (5), delphi de access yapılan uygulamalar indir (2), delphi7 access violation hatası (1), delphi map dosyası ne işe yarıyor (1), delphi ile proje örnekleri (1), delphide access violation hatası (1), delphi class access violation hatası (1), delphi access violation hatası (1), access 2 hata kodları (1), delphi access violation hataları (1), delphi access violalation (1), delphi access bağlantı hatası (1), delphi 7 stack overflow hatası (1), delphi 7 options access violation (1)

Şu tabloya bir göz atın:

Bu tablo, Lotus Notes workgroup yazılımının piyasaya ilk çıkarıldığı tarih olan 1989’dan 2000 yılına kadar kaç yerde kurulu olduğunu göstermektedir. Aslında Notes 1.0 sürümü çıkarıldığında beş yıldan beri geliştirilmekte idi. Notes’un yeterli kaliteye erişmesi ve kullanıcıların satın almaya başlaması için geçen sürenin uzunluğuna dikkatinizi çekmek isterim. Gerçekten de 1984 yılında ilk kod satırının yazılmaya başlaması ile yukarıdaki eğrinin yükselen kısmına erişmesi için tam 11 yıl geçmesi gerekmiştir. Bu süre boyunca Ray Ozzie ve kadrosu St Barts’da buzlu viski içmiyorlardı. Nefes almaksızın kod yazıyorlardı.