Delphi Forum

Metodunun başına function yerine class function yazarsan (class function nedir/ne değildir bir araştır) TLisans.Lisans şeklinde erişim sağlayabilirsin, Lisans adındaki değişkene ihtiyacın kalmaz. Ayrıca class'ın instance'ını tuttuğunu değişken adı ile aynı isimde bir metod tanımı da kafa karıştırıc...

freeman35 yazdı:

Kod: Tümünü seç

unit Ls;
interface
uses
  Winapi.Windows, System.SysUtils,SDL_cpuid,System.Classes;
  function lisans(): boolean;
implementation
......
function lisans(): boolean;
...

pascal ın temel kurallarını öğrenmeni tavsiye ederim.

bu şekilde diğer bir unitten, lisans fonksiyonuna direk erişemiyorum.

varyemez yazdı:en üstteki uses kısmına ekledin değil mi.

evet eklemediğim zaman hiç kullanamıyorum

class ı create etmeden kullanamazsın, neden class a eklemek zorunda sın ? o function ı class ın dışına çıkar. Tabi burada o function ın içeriğide önemli. zorunda değilim, ben başka bir unitteki bir fonksiyonu , ana unitimde en rahat nasıl kullanırım ona bakıyorum fonksiyon çok teferruatlı değil &qu...

varyemez yazdı:Lis1:=TLisans.create(nil); // diyerek onu kullan diğer unit içinde.

işte bunları kullanmak istemiyorum Örneğin Copy() veya Lenght() nasıl kullanılıyorsa direkt o şekilde kullanmak istiyorum.

Merhaba, Unit mantığını anlamak için uğraşıyorum. Bir konuyu anlayamadım. Örneğin Ls diye bir unit oluşturuyorum, içine de Lisans diye boolean bir function, başka bir formdan, uses'e Ls ekledikten sonra formumda istediğim yerde sadece if (Lisans) then ... deyip kullanmak istiyorum. ama kullanamadım....

Bilgiler için teşekkür ederim.
Bu program şirket içinde kullandığımız bir şey, çok üzerine düşmedim bu yüzden.

Teşekkürler freeman35 Soru sormaya üşenmedim, çözümü de yazayım üşenmeden
Bu şekilde çözdüm,

Merhaba,
Delphide ParamStr() komutu ile İlk Açılacak formu belirlemem mümkün mü ?
Mesela kısayola 1 yazarsa Form1 ile açılacak Uygulama,2 yazarsa Form2 ile açılacak

takip

Dostum Button13 ile jpeg resim kaydedebildim, Button14 ile de okuyup ımage atabildim sen çeki düzen verirsin kodlara kolay gelsin. procedure TForm20.Button13Click(Sender: TObject); begin if OpenDialog1.Execute then begin Image1.Picture.LoadFromFile(OpenDialog1.FileName); with MyQuery1 do begin close...

underwater yazdı:Haklısın fakat sadece JPG formatında ve maximum 1024x768 boyutunda dosyaları kabul ediyorum.
Dizine kaydetmek çok kullanıcılı sistemlerde mantıklı değil.

hmm c# ta yapmıştım bunu delphide deneyim becerebilirsem yazarım buraya

Merhaba,
Öncelikle Databaseye fotoğraf kaydetmeni hiç önermem gereksiz şişirirsin database'yi
Onun yerine Fotoğrafi bir dizine kaydedip, fotoğraf dizinini mssqle kaydet, program açılır ikende sqlden dizini okuyup image tipli alana fotoğrafın dizinini belirtirsin açılır.

Dikkat etmeniz gereken bir konuyu hatırlatayım Saveto ile kaydettiğiniz gridlerin daha sonrasında grid içerisine programdan yeni alanlar eklediğinizde bu alanlar grid üzerinde görünmüyor. Sonra yeni eklediğim alan grdide yok diye uğraşmayın :) İyi Çalışmalar Aynı şekilde kolon kaldırınca da gelmeye...