Delphi Forum

Example programs
https://yadi.sk/d/Yxg_uK3mic9Du

Merhaba, Win 7'de Delphi 7 kurmaya çalışıyorum. Setup dosyasını çalıştırıca "windows installer'ı yeniden yüklemek" hatası veriyor ama win 7 64 bit için uygun windows installer bulamadım. Yüklemek istediklerimde sisteme uygun değil uyarısı alıyorum. Ne yapmalıyım? C:\ Program Dosyaları (x8...

USE PROJELERX GO CREATE DATABASE ProjelerX_dbss1800 ON ( NAME = ProjelerX_Data, FILENAME = 'E:\PROJELERX\SNAPSHOT\ProjelerX_dbss1800.ss' ) AS SNAPSHOT OF ProjelerX; GO PROJELERX -> DB adı ProjelerX_dbss1800 -> Yeni oluşturulacak olan Snapshot DB adı ProjelerX_dbss1800.ss' -> HDD üzerinde oluşturulan...

nCrypToText programı ile - Hazırladığınız kriptolu metni text veya word belgesi olarak kaydedip e-mail yoluyla gönderebilirsiniz. - Steganografi (Stegano) ile mesajlarınızı Bmp image dosyası içerisinde kriptolu kaydedip e-mail yoluyla gönderebilirsiniz. - Dahili ağ üzerinde arkadaşlarınızla kriptolu...

Tarihten sonraki kısımda "Like" komutunu kullanmayı dener misin?

Genelde tarih formatından kaynaklanıyor.
manuel olarak şöyle dener misin?
2015/09/10

Paketleme için bu componenti kullanmak zorunda değilsin.
z7 isimli programın *.dll dosyalarını kullanabilirsin.
Kendi hazırladığım programın "Dizin & Dosya Paketle" bölümü bir fikir verebilir.
https://yadi.sk/d/Yxg_uK3mic9Du

https://yadi.sk/d/Yxg_uK3mic9Du
burada bulunan programın GÜNLÜK/Anı kısmını incelemeni tavsiye ederim. Bir fikir verebilir.
Kayıtlar kriptolu olarak yapılıyor, ancak ekrana çözülmüş halde geliyor.

Exceldeki tarih yazılacak hücrenin formatı metin yapılması gerekir.

ExcelApp.Range['A4:A5'].NumberFormat := '@'; // Hücre Formatını Metin YAPAR

exe ve dll boyutlarını küçültmede aspack kullanıyorum. Şimdiye kadar problem çıkartmadı. upx i hiç kullanmamıştım. Birde bunu deneyeceğim. Her iki programıda denedim. 2.811 kb - sıkıştırılacak exe 1.745 kb - upx 1.628 kb - AsPack Görüleceği üzere, AsPack daha iyi bir sıkıştırma yapıyor. Ayrıca şunu ...

http://en.softmaker.kz/articles/delphi/how-to-get-external-ip-address-using-delphi-software.html function GetHTML(const AURL: string): string; var sHead,sHost,sPage: string; x,xCnt,xCntTotal: integer; sock: TClientSocket; ws: TWinSocketStream; ss: TStringStream; buff: array[0..4095] of char; const C...

Kendi kullandığım yöntemi gönderiyorum. // Bu kısım fotoyu 600x400 ebadına getirir, bu de DB yük bindirmez. // çözünürlük ne kadar fazla olursa DB nin boyutu o kadar artar. İşlem süresi uzar procedure TForm.Foto_Size(Sender: TObject); VAR bmp : TBitmap; jpg : TJpegImage; begin FileExt:=AnsiUpperCase...

// Bir kayıt yaptığında veya sildiğinde DB üzerinde kalıcı olması için

procedure TForm.ADODataSet1AfterPost(DataSet: TDataSet);
begin
ADODataSet1.UpdateBatch(arAll);
end;

// Burayı aynı zamanda, Event sekmesindeki AfterDelete kısmınada ekle

Elindeki *.dat uzantılı dosya muhtemelen btrieve ile oluşturulmuş olabilir.