Language:

İletileri Göster

Bu özellik size üyenin attığı tüm iletileri gösterme olanağı sağlayacaktır . Not sadece size izin verilen bölümlerdeki iletilerini görebilirsiniz


Konular - halilkundakci

Sayfa: [1]
1
Lazarus'ta formun üzerindeki shape'in üzerinde bulunduğu noktaları bulmak için şöyle bir kod yazdım:

Alıntı
uses
  SysUtils, FileUtil, Forms, Controls, Graphics,Classes,
  Dialogs, StdCtrls, ExtCtrls, unit2, video, LResources;

type
  dolukareler=array of trect;
  doluyerler=array of tpoint;

public
    { public declarations }
  var
 
  dolukareler1:dolukareler;
  doluyerler1:doluyerler;
  end;

procedure TForm1.FormActivate(Sender: TObject);
var
  i,j,k,l,m: integer;
begin
  j:=0;
  m:=0;
  for i:=0 to form1.ControlCount-1 do               
  begin
    if form1.Controls.tag=2 then                          //tag değeri 2 olan shape'leri tespit ediyoruz
    begin
      inc(j);
      setlength(dolukareler1,j);
      dolukareler1[j-1].Left:=form1.Controls.Left;
      dolukareler1[j-1].Top:=form1.Controls.top;
      dolukareler1[j-1].Right:=form1.Controls.Left+form1.Controls.Width;
      dolukareler1[j-1].Bottom:=form1.Controls.top+form1.Controls.Height;
      for k:=dolukareler1[j-1].Left to dolukareler1[j-1].Right do
      begin
        for l:=dolukareler1[j-1].Top to dolukareler1[j-1].Bottom do
        begin
          if canvas.Pixels[k,l]=clblack then              //Shepe içindeki siyah renkli noktaları buluyoruz
          begin
            inc(m);
            setlength(doluyerler1,m);
            doluyerler1[m-1]:=point(k,l);
          end;
        end;
      end;
    end;
  end;
  edit2.Text:=inttostr(m);
end;

Ancak shape1'in her form üzerindeki yerini değiştirip programı çalıştırdığımda (shape1'in boyutları  ve şekli aynı kaldığı halde) farklı sonuçlar buluyor(edit2.text:=inttostr(m)). Kod mu yanlış, Lazarus'mu yanlış yoksa çalıştırırken bir hata mı yapıyorum? (Lazarus 1.6.2, Sistem:windows)

2
İstek ve Öneriler / Pisi Forum, Geliştirme, "Lazarus"
« : 09 Ocak 2017, 22:39:28 »
Pisi Forum'muzda Geliştirme altında Lazarus'ta olsa fena mı olur. "Diğer diller" arasından epeyce sıyrılacağını düşünüyorum "C" kadar olmasa da.

Tüm ilgili arkadaşlara iyi çalışmalar.

3
PiSi Paket Yapımı / pardus 2011 üzerine pisilinux
« : 13 Nisan 2015, 15:36:20 »
pardus 2011 kurulu 32 bit bilgisayarım, acaba pisi linux paketlerini kurup çalıştırabilir mi?

4
Data controls sekmesinden "TDBNavigator" seçip forma yerleştirmek için tıkladığımda: "Error creating component: TDBNavigator
Resource "DBNavInsert" not found
" hatası veriyor. İptal seçeneğine tıklıyorum ve ardından gelen mesaj: "Error destroying component of type TDBNavigator of unit :Access violation" İptal seçeneğine tıkladığımda "TDBNavigator" eklenmiyor. Ama normal çalışma ya devam ediyor. Diğer kontroller için denedim sorun yok gibi görünüyor.

Bilgisayar işletim sistemi: ubuntu
lazarus sürümü: 1.0.10
FPC version: 2.6.2
SVN RevisionUnknown
i386 Linux GTK 2

Yardımcı olabilecek arkadaşlara şimdiden teşekkürler. İyi Çalışmalar.

5
Diğer diller / Lazarus da olacak mı?
« : 25 Haziran 2013, 23:44:05 »
Daha önce Pardus 2011-2 de Lazarus'u  benim makinemde çalıştıramadım.
Windows xp'de "Lazarus 1.0.8" de uğraştığım kütüphane programlarının Linux versiyonlarını da oluşturmak ve kamulaştırmak istiyorum.
http://sourceforge.net/projects/okulkutuphane/?source=directory
http://sourceforge.net/projects/ktphane/?source=directory

Bu arada Benim bilgisayarın bazı özellikleri şöyle:

Ana İşlemci                              :        Intel(R) Pentium(R) M processor 1.70GHz
Video Bağdaştırıcı                    :        Mobile Intel(R) 915GM/GMS,910GML Express Chipset Family
Video Belleği                            :        128.00 MB
Anakart                                    :       
Model                                       :        309D
Üretici                                      :        Hewlett-Packard
Fiziksel Bellek Veri Genişliği     :        64 bit
Toplam Bellek                          :        1.99 GB

Sanırım bu durumda ben ne "64 bit pisi linux"u yükleyebilirim ne de "Lazarus"u görebilirim.

Ama bağlantı adreslerinde verdiğim programların geliştirme klasörlerinden arkadaşlar yararlanabilirler ve pisi paketlerini yapabilirlerse çok sevinirim.

Tüm pisilinux çalışanlarına ve programcı arkadaşlara iyi çalışmalar. 

Sayfa: [1]
Yukarı Çık & Back to Up